Private Sub myListView_MouseDown(ByVal sender As Object, ByVal e As _
      System.Windows.Forms.MouseEventArgs) Handles myListView.MouseDown
        Dim lvium As ListViewItem = myListView.HitTest(e.Location).Item
        If lvium IsNot Nothing Then
            Debug.WriteLine(lvium.Group.Header)
        End If
    End Sub

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist