Private Sub LinkLabel_LinkClicked(ByVal sender As System.Object, ByVal e As _
     System.Windows.Forms.LinkLabelLinkClickedEventArgs)
      If TypeOf sender Is LinkLabel Then
         Dim newLabel As LinkLabel = DirectCast(sender, LinkLabel)
 
         If e.Button = Windows.Forms.MouseButtons.Right Then
            ' mit rechts geklickt
         End If
      End If
   End Sub