我在点击Combo右边那个三解号,在他下拉时有事件发生,不知道该把代码
写在哪里,怎么写

解决方案 »

  1.   

    Private Sub Combo1_Click()
        MsgBox "Click"
    End SubPrivate Sub Form_Load()
        Combo1.AddItem "aaa"
    End Sub
      

  2.   

    Combo1_DropDown事件:Private Sub Combo1_DropDown()
        Debug.Print "2"
    End SubPrivate Sub Form_Load()
        Me.Combo1.AddItem "aa"
        Me.Combo1.AddItem "bb"
    End Sub
      

  3.   

    Private Sub Combo1_Click()
    Dim b As Integer
    b = Combo1.ListIndex
    Select Case b
    Case 0
     MsgBox "", 48, ""
     Case 1
     End Select
    End Sub
      

  4.   

    看看msdn中的Combox点击时的事件顺序
      

  5.   

    如果说是要把点击combo右边的三角,那是click事件,一般在加载是用,还是不要这样加载的好,在form_load事件中加载比较好.点击combo中内容触发某事件,是change事件.
      

  6.   

    Combo1_DropDown事件:Private Sub Combo1_DropDown()
        Debug.Print "2"
    End Sub
      

  7.   

    DropDown,Click,点的不好容易出发Change
      

  8.   

    dropdown事件是点击combo右边的三角触发的事件.
      

  9.   

    Private Sub Combo1_GotFocus()
    获得焦点事件
      

  10.   

    Combo1_DropDown事件:
    这个也是!