ComboBox - подстановка из списка?

[АндрейБ]

Подскажите как сделать подстановку из списка в элементе ComboBox.
Т.е. я заполнил этот элемент 100 значениями.
Если начинаешь вводить данные, но можно ввести то что хочешь, но как сделать что бы нажав первый символ, список хотя бы сам перемещался по списку к близкому значению, второй сивол идет делее и т.д.
Если такое не возможно, как приказать этому элементу, что бы при получение фокуса, список сам открывался, как если бы я открыл сам его нажав на стрелку в правом углу - раскрыть список. Тогда это будет действовть?

[keks-n]

Свойство Style=2.
З. Ы. Рекомендуется ликвидировать сдублировавшуюся тему, путём удаления первого поста.

[dr.MIG]

http://bbs.vbstreets.ru/viewtopic.php?t=26157

[АндрейБ]

спасибо, очень помогли, а как сделать что бы когда элемент ComboBox получает фокус список раскрывался автоматически (как если бы я набрал AKT+стрелка вниз)?

[alibek]

SendKeys "%{DOWN}" ?

[АндрейБ]

Прикольно, но
SendKeys "%{DOWN}"
работает в VB, а когда откомпилировал, перстало работать?
Как сделать что бы работало?

[Konst_One]

вот пример:

[АндрейБ]

спасибо.
У меня прикол, я поставил флажок на энебле этого элемента и хочу что бы при установке флажка элемент стал видимый и получал фокус.
Но вот фокус почему то не дает - ошибка 5:
Invalid Procedure call or argument
В чем может быть ошибка, код простой висит на нажатие флажка (ниже)?

If Check1 = 0 Then
Label3.Enabled = False
Combo2.Enabled = False
Text1.Tag = ""
Else
Label3.Enabled = True
Combo2.Enabled = True
Combo2.SetFocus
End If

[AntonGV]

Да вроде все работает...

[4@й№iK]

Странно, а у меня этот код идет... своей дорогой

[АндрейБ]

Да странно, причем иногда срабатывает, а иногда выдает ошибку, сам в панике!

[АндрейБ]

решил, смех но факт, при загрузке формы присваивалось значение этого флажка, убрал и все стало работать!

[GSerg]

В чём смех? Ты не знал, что setfocus не работает из form_load?..

[АндрейБ]

не знал.
как я понял и активат то же не работает!

[alibek]

В Activate работать будет, к этому моменту форма уже загружена и отображена. Только учитывай, что Activate происходит при любой активации формы, а не только первой.

[Konst_One]

Код: Выделить всё

Private Sub Form_Load()

Me.Show
DoEvents

'вуаля :)
Me.Check1.Value=1


End Sub

[alibek]

Konst_One, плохой совет. Попробуй сделать тоже самое с модальной формой.

[Konst_One]

на счет модальной мы не договаривались

PS
это только некий трюк, который не всегда можно юзать, но как возможный вариант

[АндрейБ]

У меня в форм.лоад не сетфокус стоял а присваивание значение флажка.
Ну да ладно, главное что сейчас все работает.
Всем спасибо за внимание.

[GSerg]

АндрейБ, ты знаешь, при присвоении значения флажка вызывается событие Click.