VPF::Заглавная строка в Combobox - Форум программистов

max1m9

Дата 21.3.2010, 12:50 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 6
Регистрация: 13.12.2009

Репутация: нет
Всего: нет

Здравствуйте,пишу макрос на Vba и никак не могу решить следующую проблему:Необходимо чтобы по умолчанию в Combobox была не пустая строка,а первая из открывающегося списка("Занята").Гуглил,спрашивал у препода - безрезультатно.Прошу у вас помощи.
Вот сам фрагмент:

Код


Private Sub ComboBox1_Change()
Dim S1, Ms1, Ts1 As Single
S1 = ComboBox1.Value
If S1 = "Свободна" Then Ms1 = InputBox("Введите пункт нахождения")
If S1 = "Скоро освободиться" Then Ms1 = InputBox("Введите пункт нахождения")
If S1 = "Скоро освободиться" Then Ts1 = InputBox("Введите время,через которое машина освободиться(в часах)")
End Sub
Private Sub UserForm_Activate()
ComboBox1.AddItem "Занята"
ComboBox1.AddItem "Свободна"
ComboBox1.AddItem "Скоро освободиться"

Это сообщение отредактировал(а) Akina - 21.3.2010, 20:25

Akina

Дата 21.3.2010, 20:25 (ссылка)

(нет голосов)

Загрузка ...

Советчик

Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454

Код


Combobox1.ListIndex=0

--------------------

О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| VB6 \| Следующая тема »