ComboBox

[Dan]

1. Дело в том, что я не могу определить какой пункт в ComboBox выбран!!! Я пытался listIndex но не выходит!!! Помогите!!!
2. Как сделать так, чтобы в ComboBox при открытии списка были скроллинги как вверх-вниз, так и влево-вправо, а то не помещается текст нескольких пунктов!!! Или лучше сделать это св-м ToolTipText? если да, то как?
ПОМОГИТЕ РЕБЯТ!!!
ЗАРАНЕЕ СПАСИБО ЗА ПОМОЩЬ!!!

[Viper]

1. Как это пытался ListIndex но не выходит? Должно выходить! Показывай код!

[MeMBus]

1

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

Private Sub Combo1_Click()
    MsgBox Combo1.Text
End Sub
Private Sub Form_Load()
    Combo1.AddItem "1"
    Combo1.AddItem "2"
    Combo1.AddItem "3"
    Combo1.AddItem "4"
End Sub

2

Стандартно по моему, никак. Есть несколько способов извратиться

[Twister]

Вот здесь статейка о том, как изменить размер выпадающей части ComboBox-a. Переделать код для твоих нужд, я думаю, труда не составит.

[Viper]

Насчет горизонтального скроллинга. Можно попробовать установить для окна ComboBox стиль WM_HSCROLL, но неуверен что для ComboBox это пройдет