Private Sub Listview1_MouseDown(ByVal sender As Object, ByVal e As _
      System.Windows.Forms.MouseEventArgs) Handles Listview1.MouseDown
        ' Bei Rechtsklick, Eintrag selektieren
        ' und PopUp-Menü anzeigen
 
        ' Rechtsklick!
        If e.Button = Windows.Forms.MouseButtons.Right Then
            Dim Item As ListViewItem
            With Listview1
                ' Eintrag ermitteln...
                Item = .GetItemAt(e.Location.X, e.Location.Y)
                If Not Item Is Nothing Then
 
                    ' ... und PopUp-Menü anzeigen
                    ContextMenuStrip1.Show(e.X, e.Y )
                Else
                    '... und anderes PopUp-Menü anzeigen
                    ContextMenuStrip2.Show(e.X, e.Y )
                End If
            End With
        End If
    End Sub

fg viperbone