Private Sub xpLink6_LinkClicked(ByVal sender As Object, ByVal e As _
        System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles _
        xpLink6.LinkClicked
 
'Dein Code
 
'Hier soll z.B das ContextMenü bei einem Klick erscheinen         
            contextMenu2.EatFinalClick = True
            contextMenu2.Show(xpLink6.LinkLabel, New Point(0, xpLink6.Height))
            contextMenu2.EatFinalClick = False
 
  End Sub