MartinLiss
Jun 4th, 2000, 01:45 AM
Example:
Dim intIndex As Integer
For intIndex = List1.ListCount - 1 To 0 Step -1
If List1.Selected(intIndex) Then
List1.RemoveItem (intIndex)
End If
Next
Dim intIndex As Integer
For intIndex = List1.ListCount - 1 To 0 Step -1
If List1.Selected(intIndex) Then
List1.RemoveItem (intIndex)
End If
Next