[Simson]

создал пустую форму без кнопок кода и тд... написал макрос запуска этой формы и последующей выгрузки( ну или без нее)

Код:

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

Sub test()

    UserForm1.show
    Unload UserForm1
    
End Sub

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

[Сергей812]

Редактор VBA порою живет своей жизнью, причем рандомно) Смиритесь и перезагружайтесь, к примеру) В том же NET API есть специальные функции для запуска модальных форм в контексте именно самого приложения акад.

----- добавлено через 58 сек. -----
p.s. Указывайте в заголовке язык программирования, плиз.

[Simson]

спасибо, почитаю

[Сергей812]

просто раньше альтернативы не было - либо лисп (он непривычен, проблемы с созданием диалогов) либо VBA. ObjectARX стоял в сторонке особняком, из-за низкоуровневой работы с акадом там надо хорошо понимать, что делаешь) А сейчас уже много материала на Net (в том числе и на русском), сама среда исполнения представлена уже в виде оберток над низкоуровневыми функциями, с внутренними проверками - т.е. чтобы уронить акад в фатал, надо приложить определенные усилия. Сред разработки, включая бесплатных - тоже достаточно. Изучать полностью талмуты в тысячи страниц, чтобы начать писать на Net - совершенно не обязательно. Во всяком случае, чтобы выйти на уровень того - что можно написать на VBA)

[Бахил]

Сообщение от Simson Код: Sub test() UserForm1.show Unload UserForm1 End Sub

Offtop: Из серии "Программисты шутят"
Используй .Showmodal.

----- добавлено через ~5 мин. -----
Offtop: А вообще надо хоть немного понимать как работает ОС

[Simson]

неужели должны быть проблемы чтоб обработать обычную форму? это же основа.. может какую то строчку упустил ?
просто вба уже встроен и с ним просто работать.. в связке с екселем тоже

----- добавлено через ~3 мин. -----

Сообщение от Бахил Используй .Showmodal.

такого нет ..
UserForm1.show vbModal
пробовал и выходит то же самое

[Сергей812]

Сообщение от Simson UserForm1.show vbModal

и просто UserForm1.show эквиваленты в VBA.

----- добавлено через ~13 мин. -----

Сообщение от Simson просто вба уже встроен и с ним просто работать..

как раз он не встроен в акад по умолчанию) А насчет простой работы - когда поработаешь в даже бесплатных студиях, а потом садишься кодить в VBA (для офиса) - становится очень грустно от безнадежно застывшего в развитии языка и среды разработки.

[Simson]

почему в таком случае Net а не С# например?

[Сергей812]

Сообщение от Simson почему в таком случае Net а не С# например?

разберитесь в терминологии: .Net - это фреймворк, а C# - лишь один из языков программирования с использованием .Net.

[Simson]

похоже пора начать разбираться.. я просто только начал постигать это.. и начал с вба собственно. спасибо

----- добавлено через ~1 мин. -----
а может подскажете на каком языке актуальнее, проще, удобнее писать?

[Бахил]

Сообщение от Simson такого нет

Есть! Попробуй

Код:

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

Sub test()
UserForm1.showmodal
End Sub

Почувствуешь разницу

[Simson]

если это шутка то так себе

[Бахил]

В екселе работает...

[Simson]

кажется форум dwg называется...

[Бахил]

Так VBA он для любого приложения...
Offtop: Впрочем...Если такой "умный" хрена вопросы задавать? Переходи на Сишарп. Там гораздо больше глюков у тебя будет.

[Сергей812]

ShowModal
причем через браузер объектов (F2) этого свойства нет, доступен лишь через палитру свойств формы. Хотя при этом пишут - что свойство доступно только для чтения во время выполнения)

[Бахил]

Offtop: Код ТС - БСК. К сожалению он не может понять, что ему советуют. Правильный код в № 5. Если человек...

[Simson]

да пробовал я так вводить ничего не меняется!! к тому же как уже сказали выше это роли не играет! если нажмешь на форму у нее в параметрах по умолчанию стоит modal true! в екселе работает и без modal!в автокаде никак.

[Сергей812]

Сообщение от Бахил Правильный код в № 5.

браузер объектов редактора VBA не "видит" ShowModal в программной модели, официальный хелп от Майкрософт говорит - что это свойство. При этом вы пытаетесь уверить, что это правильный код:

Сообщение от Бахил UserForm1.showmodal

Сообщение от Бахил В екселе работает...

в принципе, можно свойство написать так - что при присвоении какого-то значения оно будет выполнять определенный код. Но тогда должно быть справа присвоение значения, а не попытка вызова свойства как процедуры/функции.

[Сергей812]

Simson, попробуй так вызывать

Код:

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

Dim lDlg as new UserForm1
lDlg.Show
Unload lDlg

[Simson]

пробовал.. не помогает.
написал end в конце.. иначе не смог остановить эту машину

[Сергей812]

попробуй дописать в коде формы обработчик события закрытия

Код:

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

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
  If (CloseMode = vbFormControlMenu) Then
    Cancel = 1
    Me.Hide
  End If
End Sub

т.е. чтобы при закрытии крестом или по ALT-F4 просто скрывал форму. А потом Unload в процедуре, откуда вызывал

[Simson]

слишком сложно. обойдусь End
Спасибо)

[Сергей812]

в общем, потестил на виртуалке: такое впечатление, что пока окно активного документа не получит фокус ввода обратно, оно блокирует завершение процесса.

[Бахил]

Offtop: Просто не нужно выгружать форму.

[Сергей812]

Получается, что с End самый рабочий вариант) Отмена выгрузки формы не влияет на проблему.

[Simson]

но этот выход мне до сих пор не нравится... не должно так быть.. в екселе ведь тот же самый код работает как надо

[Сергей812]

Сообщение от Simson но этот выход мне до сих пор не нравится... не должно так быть.. в екселе ведь тот же самый код работает как надо

Для офиса VBA родной язык изначально) Можно еще оформить это все в виде пользовательской команды акада - но не уверен, что VBA это позволит сделать.

[Simson]

да пускай так будет раз нет более лаконичного решения чем енд
никто никогда не пользовался формами? или почему никто не сталкивался с этим? никто не пишет на вба похоже

[Сергей812]

я тоже писал сначала несколько месяцев на VBA в акаде. И устав от рандомных глюков - ушел с него раз и навсегда, надеюсь) Но для офиса использую достаточно активно в то же время.

[trir]

Когда AutoCAD стал x64 с VBA случилась жопа, особенно с формами. Хотя в последнее время её подлечили...

[Simson]

Сообщение от Сергей812 ушел с него раз и навсегда

на что перешли?

----- добавлено через ~2 мин. -----
а если допустим в офисе писать на вба а в акаде на другом языке их между собой можно связать?

[Сергей812]

Сообщение от Simson на что перешли?

на конечном итоге на C#.

Сообщение от Simson а если допустим в офисе писать на вба а в акаде на другом языке их между собой можно связать?

Обрабатывайте информацию внутри акада, отчеты выводите в офис через COM-интерфейс, например. На VBA в офисе пишу вспомогательные макросы лишь для ручных рутинных операций.