窗体上放置一个ComboBox和一个Button,并添加以下代码。
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MsgBox(Me.ComboBox1.SelectedIndex)
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.ComboBox1.Items.AddRange(New Object() {"aa", "bb", "cc", "dd"})
End Sub
End Class
【操作步骤】
1、ComboBox选中一个项目(例如"bb"),单击Button,MsgBox提示"1"。这个没有问题。
2、再次打开ComboBox下拉列表,不要关闭下拉列表,按下BackSpace键清空ComboBox中的内容,仍然不关闭下拉列表,直接点击Button,MsgBox仍然提示"1"。但此时下拉列表中显示的为空白,按理说应该SelectedIndex = -1才对啊???