Loop through a listbox and remove item ?

[VBShaper]

I want to loop through a Listbox and remove item based on a textbox text.

Dim i As Integer
For Each item In ListBox1.Items
For i = 0 To ListBox1.Items.Count - 1
If ListBox1.Items(i).ToString.Contains(TextBox2.Text) Then
ListBox1.Items.Remove(i)
End If
Next
Next

Continue reading...