★★★各位大虾，我想在ComcoBox控件的菜单内容改变时触发事件，应该用_change()事件吗，不行呀！！！

Question

用ComBo1_click()
试试不行的话，
用 ComBo1_click()事件与Combo1_Change()合作

Answer 1

Private combo1_mouseup(......)
msgbox "aaaaaa"
end sub

Answer 2

用键盘或鼠标选择列表项目时,应当用_Click事件,其中,选中的项目编号由ListIndex属性给出,从零开始.
如果当前没有选定项目,或者手动编辑文本,则引起_Change事件,此时ListIndex=-1
Private Sub Combo1_Change()
    Debug.Print "Combo1_Change()"
End SubPrivate Sub Combo1_Click()
    Debug.Print "Combo1_Click()" & Combo1.ListIndex
End SubPrivate Sub Form_Load()
    With Combo1
        .AddItem "sadfasdfsadf"
        .AddItem "sadfasdfsadf"
        .AddItem "sadf"
        .AddItem "sadfas"
    End With
End Sub

Answer 3

楼上的基本正确
还可以通过比较listindex的变化来判断

Answer 4

设置comboboxde的style 为simply即可

Answer 5

ComboBox_Change该事件仅在 Style 属性设置为 0（下拉 Combo）或 1（简单 Combo）和正文被改变或者通过代码改变了 Text 属性的设置时才会发生。ComboBox_Click此事件是在一个对象上按下然后释放一个鼠标按钮时发生。它也会发生在一个控件的值改变时。
因此你应使用ComboBox_Click+ComboBox_KeyUp，可以解决90%的问题。

Answer 6

'改变时触发事件
Private Sub Form_Load()
    Timer1.Enabled = True
    Timer1.Interval = 100
    '设置 Text1.Text = "Combo1"
End SubPrivate Sub Text1_Change()
'-----------------------
    MsgBox "aaaaaaaaa"
End SubPrivate Sub Timer1_Timer()
    Text1.Text = Combo1.Text
End Sub

Answer 7

这个方法很浪费啊
    Text1.Visible =False

Answer 8

这个控件不好，在别的语言里，因该是当内容改变了就执行，可这个不行，所以就用click事件吧。

Answer 9

你可以用 spy++ 观察一下他发生变化时的 message 再用自己的回调函数自己解决。看他往哪里跑