[求助]用list控件如何实现多项删除啊?
list1的multiselect属性设为2Private Sub CmdClear_Click()
Dim r As Integer
For r = 0 To List2.ListCount - 1
If List2.Selected(r) = True Then
List2.RemoveItem r
End If
Next r
End Sub
请大家看看上面的代码,当我选择多个列表框后,程序提示"无效的过程调用或参数"
List2.RemoveItem r被涂成黄色
求求各位大哥大姐救救我吧!!!!!!!!!!!
