[Bart]

Пишу программу на VBA. Задача поставлена такая: задавать данные и должен формироваться шкаф (система управления) и куча чертежей к нему на основе входящих данных. Хотят, чтобы нажал кнопку и все само нарисовалось.
В VBA я не силен. Написал одну програмку лет 5 назад.

Начал я с эл. схемы. Задаю количество источников питания, нажимаю OK и вставляется определенное количество блоков. Там обозначения, нумерация, маркировка проводов. Все сделано аттрибутами. Как мне эти аттрибуты изменять при вставке автоматом? Там к значению просто +1 прибавляется у 5 аттрибутов. Как до аттрибутов добраться?

[AlexV]

Чего-то типа:

Код:

[Выделить все]

dim ....
....
Set insertedBlock = ThisDrawing.ModelSpace.InsertBlock(InsertPnt, name_Blck, Scale_Blck, Scale_Blck, Scale_Blck, Rotate_Blck)
Attr1 = insertedBlock.GetAttributes
      For Each Attr In Attr1
           If Attr.TagString = "имя атрибута" Then
              Attr.Textring="Значение атрибута"
           End If
      Next
    End If
  End If

insertedBlock - вставленный экземпляр блока, проходим в цикле по всем атрибутам, находим нужный по имени, задаем ему нужное значение...

[Кулик Алексей aka kpblc]

Если ent - указатель на вхождение блока, то у него есть метод GetAttributes. Ну, а дальше - уже сам
---
Опоздал

[Bart]

Ага. Спасибо. Как раз то, что нужно. Буду пробовать.

Может подскажете какую справочную литературку или сайт с примерами?

[Кулик Алексей aka kpblc]

А что, обычной справки мало?

[AlexV]

Сообщение от Bart Может подскажете какую справочную литературку или сайт с примерами?

:
http://www.cad.dp.ua/stats/a_vba/

[Bart]

Сообщение от Кулик Алексей aka kpblc А что, обычной справки мало?

В справке не понятно куда смотреть и что искать. По данному вопросу я поискал-поискал в справке и ничего не нашел.

[AlexV]

Сообщение от Bart В справке не понятно куда смотреть и что искать. По данному вопросу я поискал-поискал в справке и ничего не нашел.

Плохо искали.. При работе с примитивами автокада лучший способ - открыть объектную модель, щелкнуть по нужному типу примитива, и увидишь все его методы/свойства. Опять-таки щелкаешь по методу - видишь его описание; можно открыть пример кода (при наличии, чаще всего - он есть). Кстати, вот ресурс - попытка перевода справки по VBA на русский (коряво, "машинно", но все-таки...): http://vbamodel.narod.ru/AutoCAD/idx_object_model.htm

[Bart]

И еще вопрос. Переменные нужно декларировать или не обязательно?

[AlexV]

Если в начале модуля есть "фраза" Option explicit, то надо. Если нет, то не обязательно..

[Кулик Алексей aka kpblc]

Но лучше поставить Option Explicit и не мучаться потом с непонятным поведением

[Sleekka]

лучше вообще забыть про VBA чтоб потом не мучаться
http://dwg.ru/dnl/254 - раз прога недоделаная, но можно поучиться на примере.
http://dwg.ru/dnl/1931 - два прога доделанная, если не понятно как атрибуты редактировать то там есть
ЗЫ если в ВБА все равно не шаришь пиши на лиспе.

[Bart]

Sleekka
У меня другая задача. Не просто работа с атрибутами. Но проги посмотрю при случае. И почему забыть про ВБА?
А лисп для меня вообще загадка, на вба проще.

[Sleekka]

на лиспе нужно меньше писать раза так в 3 чтобы решить ту же задачу что и на вба, к тому же когда придется работать с массивами данных, в вба - чтобы массив был динамическим нужно будет при записи элемента постоянно назначать новую размерность массиву, вобщем намучаетесь, вба это так - цвет линии поменять и только, серьезных задач там не решить.

[Bart]

Ну а где решить?
Мне, возможно, нужно будет делать менюшку, экспорт данных в access, эксель и ворд, а так же и обратно. Еще открывать файл, делать в нем чертеж и сохранять куда нужно.
Возможно все это будет через меню, а возможно будет считываться из файла эксель. Пока еще не ясно, все в процессе.
На данный момент идет процесс изучения.

Лисп я совсем не знаю, и мне как-то кажется, что он для этого не подойдет.

[AlexV]

Сообщение от Bart Ну а где решить? Мне, возможно, нужно будет делать менюшку, экспорт данных в access, эксель и ворд, а так же и обратно. Еще открывать файл, делать в нем чертеж и сохранять куда нужно. Возможно все это будет через меню, а возможно будет считываться из файла эксель. Пока еще не ясно, все в процессе. На данный момент идет процесс изучения. Лисп я совсем не знаю, и мне как-то кажется, что он для этого не подойдет.

Возможно, это можно и на лиспе сделать (я его тоже не знаю), но для взаимодействия с экселями и прочими вордами мне кажется, VBA подойдет лучше.. Правда, в состав Autocad 2010 модуль VBA уже не входит (можно его качнуть с автодесковского сайта и доустановить), а в будущих версиях, возможно, он и вовсе отомрет..

[Bart]

Как не входит??? Фига себе.
А тут нигде нет обсуждения о том, на чем программировать? Если VBA отпадет, то не понятно как дальше все работать будет.

[Кулик Алексей aka kpblc]

VBA-модуль не поставляется в комплекте с AutoCAD 2010 и продуктами на его основе (но этот модуль еще можно скачать с официального сайта).
Почему "непонятно на чем программировать"? lisp / arx / .net - и вперед

[Bart]

Почитал я Autodesk.
VBA закончилось, советуют переходить на VB Express Edition. Он же и есть .net.
А кто на чем программирует? С лиспом все ясно.
Я просто думаю (свои требования я описал в первом посте) делать все на VB или переходить на что-то еще. Программистов рядом нет, так что спросить совета не у кого.

А в 2009 автокаде нормально будет работать то, что сделано на VB экспресс? И как там интегрируется?
Просто сейчас можно прогу запускать в самом акаде. Еще даже не законченую.

[AlexV]

Сообщение от Bart Как не входит??? Фига себе. А тут нигде нет обсуждения о том, на чем программировать? Если VBA отпадет, то не понятно как дальше все работать будет.

VB.net, C++, C#... Я не знаю, конечно, как политика автодеска изменится, но возможно, уже для следующей версии разработанные VBA-шные модули уже будут неприменимы..