AJUDA COM LISTVIEW

KURTGU 20/05/2017 14:27:19
#474084

FOXMAN OBRIGADO Baseado na sua ideia consegui resolver o problema.

KURTGU 20/05/2017 14:29:24
#474085

Dim posicao As Int32
Dim listItem As ListViewItem

For posicao = ListView1.Items.Count - 1 To 0 Step -1
listItem = ListView1.Items(pos)
If listItem.SubItems(1).Text = i.nomepaciente Then
ListView1.Items.Remove(listItem)
End If
Next