Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        ListView1.Items.Clear()
        Dim i As Integer
        For i = 0 To 10
            If i < 5 Then
                ListView1.Items.Add(i.ToString)
            Else
                ListView1.Items.Add("")
            End If
        Next
        End Sub

Private Sub ListView1_MouseUp(sender As Object, e As MouseEventArgs) Handles _
  ListView1.MouseUp
 
        If e.Button = Windows.Forms.MouseButtons.Left Then
            Dim index As Integer = 0
            Dim str As String = ""
            index = ListView1.FocusedItem.Index
 
            str = ListView1.FocusedItem.SubItems(0).Text
            If str = String.Empty Then
                str = "Empty Row"
            End If
            MsgBox("Index   " & index.ToString & " Item " & str)
        End If
 
    End Sub