|
||
| Правила | Регистрация | Пользователи | Сообщения за день | | Поиск | | Справка по форуму | Файлообменник | |
|
![]() |
Поиск в этой теме |
![]() |
#1 | |
VBA на AutoCad 2013 не выполняется метод AddLine, AddPoint
Регистрация: 02.02.2012
Сообщений: 22
|
||
Просмотров: 4394
|
|
||||
Регистрация: 02.02.2012
Сообщений: 22
|
Sub Example_AddLine()
Dim lineObj As AcadLine Dim startPoint(0 To 2) As Double Dim endPoint(0 To 2) As Double startPoint(0) = 1#: startPoint(1) = 1#: startPoint(2) = 0# endPoint(0) = 5#: endPoint(1) = 5#: endPoint(2) = 0# Set lineObj = ThisDrawing.ModelSpace.AddLine(startPoint, endPoint) ZoomAll End Sub тупо пример из справки не идёт , пишет ru-time error 13 Type mismatch |
|||
![]() |
|
||||
и AutoCAD наверняка х64....
__________________
Надеюсь, ты не социальный овощ? Это определяется делами! :welcome: |
||||
![]() |
|
||||
Инженер Регистрация: 02.10.2008
С-Пб
Сообщений: 3,706
|
У меня А2013 64b, - данный конкретный код выполняется без проблем.
__________________
...Не пытайся гнуть ты ложку, Не вяжи её узлом. Ложка - ложка понарошку, А по правде, - это лом! |
|||
![]() |
|
||||
Возможно у автора в VBA проекте остались некоторые ссылки на библиотеки версии x86, вместо x64 (как вариант).
__________________
Надеюсь, ты не социальный овощ? Это определяется делами! :welcome: |
||||
![]() |
|
||||
Неплохо бы еще поставить SP1.1 на AutoCAD 2013, да и соответствующий VBA Enabler
__________________
Сообщество программистов Autodesk в СНГ - техническая поддержка |
||||
![]() |
![]() |
|
|
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Где в AutoCAD as Civil 3D 2013 панели вкладки "Лист"? | black_mts | Вертикальные решения на базе AutoCAD | 12 | 02.07.2015 23:07 |
книги по VBA AutoCAD | DY | Программирование | 30 | 15.02.2013 16:16 |
Объектное отслеживание и команда Измерить в AutoCad 2013 | staVall | AutoCAD | 1 | 16.10.2012 10:14 |