Question

vb中如何判断组合框没有选中？

Answer 1

可以参考下面的两个小程序

Private Sub Command1_Click() ‘“删除”
Dim ind As Integer
ind = Combo1.ListIndex
If ind <> -1 Then '-1表示无表项
Combo1.RemoveItem ind '删除已选定的表项

End If
End Sub

Answer 2

利用gotfocus事件来判断是否被选中，
Private Sub Combo_GotFocus()
MsgBox "已选中"
End Sub

如果你的意思是listbox的列表是否被选中的话，那就是另外的答案了

Answer 3

用listindex属性 ,当没有选中是listxindex=-1，选中后则为>=0
if combo1.listindex>=0 then msgbox "已选中"

Answer 4

可以参考下面的两个小程序
Private
Sub
Command1_Click()
‘“删除”
Dim
ind
As
Integer
ind
=
Combo1.ListIndex
If
ind
<>
-1
Then
'-1表示无表项
Combo1.RemoveItem
ind
'删除已选定的表项
End
If
End
Sub