脚趾抽筋怎么办:VB中Combobox ,是怎么监视它被选择的?

来源:百度文库 编辑:杭州交通信息网 时间:2024/04/29 14:26:27
我想实现一个 combo1 有三个项"大的" "小的" "没有了"
当选择"大的"的时候,msgbox "你选大的??"
当选择"小的"的时候,msgbox "你选小的??"
当选择"没有了"的时候,msgbox "没有了?"

不知道怎么搞??

用Change事件不可行,因为只是当Text属性改变了才触发,所以用Click事件就可以了:

Private Sub Form_Load()
For i = 0 To 2
Combo1.AddItem Array("大的", "小的", "没有了")(i)
Next
End Sub
Private Sub Combo1_Click()
MsgBox Array("你选大的??", "你选小的??", "没有了?") _
(Combo1.ListIndex)
End Sub

可以将触发的事件选为“Private Sub Combo1_Change()”
在这个Sub里面写代码,用if语句判断每个选项的代号,再用msgbox""就可以了