Private Sub ListView1_KeyUp(ByVal sender As Object, ByVal e As _
   System.Windows.Forms.KeyEventArgs) Handles ListView1.KeyUp
        If e.Control = True And e.KeyCode = Keys.V And Clipboard.ContainsText = _
        True Then ' Item aus Zwischenablage einfügen
            ListView1.Items.Add(Clipboard.GetText)
        ElseIf e.Control = True And e.KeyCode = Keys.C And _
          ListView1.SelectedItems.Count > 0 Then 'Item in Zwischenablage kopieren
            Clipboard.SetText(ListView1.SelectedItems(0).Text)
        End If
    End Sub

 Private Sub ContextMenu1_Opening(ByVal sender As Object, ByVal e As _
   System.ComponentModel.CancelEventArgs) Handles ContextMenu1.Opening
        EinfügenMenu.Enabled = Clipboard.ContainsText ' wenn Text in 
        ' Zwischenablage MenÜ aktivieren
        If ListView1.SelectedItems.Count > 0 Then ' wenn Item markiert Menü 
        ' aktivieren
            KopierenMenu.Enabled = True
        Else : KopierenMenu.Enabled = False
        End If
    End Sub
    Private Sub EinfügenMenu_Click(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles EinfügenMenu.Click
        ListView1.Items.Add(Clipboard.GetText)
    End Sub
 
    Private Sub KopierenMenu_Click(ByVal sender As Object, ByVal e As _
      System.EventArgs) Handles KopierenMenu.Click
        Clipboard.SetText(ListView1.SelectedItems(0).Text)
    End Sub

Wenn alle Stricke rei?en, dann h?ng ich mich auf. ~ Karl Kraus