Detectar item seleccionado en un Listview

[alehawk]

If ListView2.SelectedIndices.Count <> 0 Then
' step through each selected item
Dim i As Int16
For Each i In ListView2.SelectedIndices
Dim s As String
tudato= ListView2.Items(i).Text
tudatocolumna1 = ListView2.Items(i).SubItems(1).Text
tudatocolumna2 = ListView2.Items(i).SubItems(2).Text
next i
end if