Evento Click individuare Item

Private Sub ListView1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListView1.Click
If ListView1.SelectedItems.Count > 0 Then
Dim list As ListViewItem = ListView1.SelectedItems(0)
MsgBox(list.Text & " " & list.SubItems(1).Text)
End If

End Sub