Combox事件

Question

点击那个三角形，发生的事件，是什么事件

Answer 1

Private Sub Combo1_Change()
Debug.Print "1"
End SubPrivate Sub Combo1_Click()
Debug.Print "2"End SubPrivate Sub Combo1_DblClick()
Debug.Print "3"End SubPrivate Sub Combo1_DragDrop(Source As Control, X As Single, Y As Single)
Debug.Print "4"End SubPrivate Sub Combo1_DragOver(Source As Control, X As Single, Y As Single, State As Integer)
Debug.Print "5"End SubPrivate Sub Combo1_DropDown()
Debug.Print "6"End SubPrivate Sub Form_Load()
Combo1.AddItem "djl"
End Sub

Answer 2

不好意思，vb没有对此事件进行封装。如果你想通过代码中将整个列表显示出来，请用下面代码：
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 = &H14FPrivate Sub Command1_Click()
    SendMessage Combo1.hwnd, CB_SHOWDROPDOWN, 1, vbNullString
End Sub

Answer 3

Private Sub Combo1_DropDown()
Debug.Print "6"End Sub五楼正确

Answer 4

+1 +2 之类是啥意思 MSDN上没查到...