[code lang="vbnet"] With ListBox1 ' If we have some selected items. If .SelectedIndices.Count > 0 Then ' Loop through selected indicies to get the index number of ' the selected item. ' We need to cound back through the list to avoid reindexing the ' the list as we go. For i As Integer = .SelectedIndices.Count - 1 To 0 Step -1 ' Remove the item. .Items.RemoveAt(.SelectedIndices(i)) Next End If End With [/code]