All Forums
 Категория Visio
 Форум Вопросы и ответы
 Событие перед открытием UserForm
Author Previous Topic Topic Next Topic  

9rey

Russia
30 Posts

Posted - 11/13/2011 :  09:49:26
подскажите пожалуйста:
1. какое событие возникает ПЕРЕД отображением пользовательского окна (UserForm), нарисованного редактором VBA?
надо произвести ряд действий ДО того как окно отобразилось командой UserForm1.Show
2. Каким образом можно добавить на UserForm свой Control, например ListBox или кнопку в процессе выполнения программы? т.е. не штатными средствами редактора VBA, а в ходе выполнения кода.

Robinkzn

84 Posts

Posted - 11/13/2011 :  11:32:42
1.
Private Sub UserForm_Initialize()
Разместите в коде формы.

2. Следующий код выполняйте в thisdocument или в модуле.

Sub add()

Set myControl = UserForm1.Controls.add("Forms.ComboBox.1", "combo1", True)
MsgBox myControl.Name
UserForm1.Show

End Sub

Go to Top of Page

9rey

Russia
30 Posts

Posted - 11/13/2011 :  11:42:01
Большое спасибо!
Go to Top of Page
  Previous Topic Topic Next Topic  
Данный сайт является архивом форума visio.artberg.ru, который был закрыт в связи с переходом на новую платформу visio.getbb.ru
Все материалы доступны только для чтения! Если у вас появились вопросы, или вы хотите что-то обсудить, связанное с Visio, обращайтесь на новый форум!
Архив был создан благодаря совместным усилиям Генадия Туманова @Tumanov (visio.artberg.ru), Александра ака @Surrogate (visio.getbb.ru), и Николая Белых @nbelyh (unmanagedvisio.com)