VB让ListBox没有空行/移除ListBox空行,VB清除ListBox空行,VB消除ListBox空行,VB让ListBox没有空行,VB移除ListBox空行,VB选中list第一行,VB读取list当前选中项。

VB让ListBox没有空行,VB移除ListBox空行:

Dim N As Integer
For N = 0 To List.ListCount - 1                                             '循环遍历ListBox
    If List.List(N) = "" Then List.RemoveItem N                             '如果内容为空就移除
Next N

VB选中list第一行:
List1.Selected(0) = True

VB读取list当前选中项:
MsgBox List1.List(List1.ListIndex)