Const CB_GETDROPPEDWIDTH = &H15F
Сообщение CB_GETDROPPEDWIDTH получает ширину в пикселах выпадающего списка Комбинированного окна (ComboBox) со стилями CBS_DROPDOWN или CBS_DROPDOWNLIST.
В успешном случае возвращается новая ширина выпадающего списка. В случае ошибки возвращается CB_ERR
' Получим ширину выпадающего списка comboBox
Combo1.AddItem "Русский_Проект"
Combo1.AddItem "Справочник по сообщениям Windows"
Combo1.AddItem "Александр Климов"
Debug.Print SendMessage(Combo1.hWnd, CB_GETDROPPEDWIDTH, 0, 0)