Question

Listbox中，单击选择一项，再次单击取消选择，该怎么实现（vb）???

关键是如何判断这次单击和上次单击选择的是同一项？

Answer 1

如果你要实现“单击选择一项，再次单击取消选择”这个效果推荐你用这个代码：
假设此ListBox控件的名称为List1
Private Sub List1_Click()
If List1.ListIndex = Val(List1.Tag) Then
List1.ListIndex = -1
Else
List1.Tag = List1.ListIndex
End If
End Sub

判断这次单击和上次单击选择的是否是同一项：
先在属性中将List1的Tag属性设为"-1"
If List1.ListIndex = Val(List1.Tag) Then
(此处为这次单击和上次单击选择的是同一项的代码)
Else
(此处为这次单击和上次单击选择的不是同一项的代码)
End If

Answer 2

楼上的就回答很好,我只是路过下.