vb中如何把list中的列表项全部选中

来源：百度知道 编辑：UC知道 时间：2024/05/12 20:10:18
如题：

先把List1的MultiSelect属性设置为1或2，然后建一个Command1，代码如下。
＝＝＝＝＝＝＝＝＝＝＝
Private Sub Command1_Click()
Dim i As Integer
For i = 0 To List1.ListCount - 1
List1.Selected(i) = True
Next
End Sub