Right Click in VB.NET

    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