Const CB_SETDROPPEDWIDTH = &H160
Сообщение CB_SETDROPPEDWIDTH устанавливает максимально допустимую ширину в пикселах выпадающего списка Комбинированного окна (ComboBox) со стилями CBS_DROPDOWN or CBS_DROPDOWNLIST, что соответствуют в Visual Basic стилям 0 - Dropdown Combo и 2 - Dropdown List. По умолчанию ширина выпадающего списка равна ширине самого Комбинированного окна
В успешном случае возвращается новая ширина выпадающего списка. В случае ошибки возвращается CB_ERR
' Установим ширину выпадающего списка Combo1 Combo1.AddItem "Русский_Проект" Combo1.AddItem "Справочник по сообщениям Windows" Combo1.AddItem "Александр Климов" SendMessage Combo1.hWnd, CB_SETDROPPEDWIDTH, 300, 0 ' Выберем второй элемент списка Combo1.ListIndex = 1