Klik Kanan pada VB.NET

    Private Sub Label1_MouseDown(sender As Object, e As MouseEventArgs) Handles Label1.MouseDown
        If e.Button = MouseButtons.Right Then
            MsgBox("Right Button Clicked")
        End If
    End Sub

    'Private Sub Panel1_MouseDown(sender As Object, e As MouseEventArgs) Handles Panel1.MouseDown
    '    If e.Button = MouseButtons.Right Then
    '        MsgBox("Right Button Clicked")
    '    End If
    'End Sub

    Private Sub Ucfg2dypx_MouseDown(sender As Object, e As MouseEventArgs) Handles MyBase.MouseDown
        If e.Button = MouseButtons.Right Then
            MsgBox("Right Button Clicked")
        End If
    End Sub

    Private Sub Panel1_MouseClick(sender As Object, e As MouseEventArgs) Handles Panel1.MouseClick
        If e.Button = MouseButtons.Right Then
            MsgBox("Right Button Clicked")
        End If
    End Sub