Как программно развернуть Combo Box

Добавьте combo box с именем cboCombo, и кнопку cmdDrop. Если Вам понадобится закрыть обратно выпадающий список, то просто вызовите API функцию SendMessage с CB_SHOWDROPDOWN и False вместо True.

Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Const CB_SHOWDROPDOWN = &H14F 'WM_USER + 14

Private Sub cmdDrop_Click()
    SendMessage cboDrop.hwnd, CB_SHOWDROPDOWN, True, 0
End Sub