Private Sub ToolStripDropDownButton1_MouseMove(sender As Object, e As _
   System.Windows.Forms.MouseEventArgs) Handles _
   ToolStripDropDownButton1.MouseMove
        If e.Button = Windows.Forms.MouseButtons.Left Then
            ToolStripDropDownButton1.DoDragDrop("linke Taste", _
              DragDropEffects.Copy)
        ElseIf e.Button = Windows.Forms.MouseButtons.Right Then
            ToolStripDropDownButton1.DoDragDrop("rechte taste", _
              DragDropEffects.Move)
        End If
    End Sub

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