Легенда:
 новое сообщение
 закрытая нитка
 новое сообщение
 в закрытой нитке
 старое сообщение
|
- Напоминаю, что масса вопросов по функционированию форума снимается после прочтения его описания.
- Новичкам также крайне полезно ознакомиться с данным документом.
Не работает :( 17.10.07 13:26 Число просмотров: 3316
Автор: Fighter <Vladimir> Статус: Elderman
Отредактировано 17.10.07 13:36 Количество правок: 2
|
> Private Sub CommandButton1_Click()
> ComboBox1.Clear
> ComboBox1.AddItem ("1")
> ComboBox1.AddItem ("2")
> ComboBox1.AddItem ("3")
> ComboBox1.AddItem ("4")
> ComboBox1.AddItem ("5")
> End Sub
Здесь ругается на ошибку 424(?) и предлагает заняться отладкой.
Если написать
UserForm1.ComboBox1.Clear
UserForm1.ComboBox1.AddItem ("1")
...
то не ругается, но и не работает - комбобокс пустой. Правда эти строки я вынес в отдельную процедуру, выполняющуюся при активации определенного листа в Ёкселе:
Sub DoAllNeeded()
Load UserForm1
UserForm1.ComboBox1.Clear
UserForm1.ComboBox1.AddItem ("1")
UserForm1.ComboBox1.AddItem ("2")
UserForm1.ComboBox1.AddItem ("3")
UserForm1.ComboBox1.AddItem ("4")
UserForm1.ComboBox1.AddItem ("5")
UserForm1.Show
End Sub
>
> Private Sub CommandButton2_Click()
> MsgBox (ComboBox1.ListIndex)
> End Sub
Здесь выдает -1
|
|
|
подробно о проекте
Анализ криптографических сетевых...
