by twentyleafclover (2 Submissions)
Category: Miscellaneous
Compatability: Visual Basic 3.0
Difficulty: Intermediate
Date Added: Wed 3rd February 2021
Rating: (5 Votes)
For Beginners. Get rid of unwanted listbox duplicates in a few very simple lines of code.
Dim j As Integer
j = 0
Do While j < List1.ListCount
List1.Text = List1.List(j)
If List1.ListIndex <> j Then
List1.RemoveItem j
Else
j = j + 1
End If
Loop
End Sub