你已经有了“鼠标右键点击的事件”
青州ssl适用于网站、小程序/APP、API接口等需要进行数据传输应用场景，ssl证书未来市场广阔！成为成都创新互联的ssl证书销售渠道，可以享受市场价格4-6折优惠！如果有意向欢迎电话联系或者加微信：13518219792（备注：SSL证书合作）期待与您的合作！
说明你肯定已经有了if e.button=windows.forms.mousebuttons.right then
你只需要找到这条语句，通常这句话应该在你的mouseclick事件中。
这条语句改成
if e.button=windows.forms.mousebuttons.left or e.button=windows.forms.mousebuttons.right then
就可以了！
^_^
上面的回答不完美，在窗口的任意地方右击都会弹出窗口，所以要力求完美，必须先判断红框的坐标，在红框范围内再弹出窗口 If e.Button = Windows.Forms.MouseButtons.Right Then If e.X 153 And e.X 601 And e.Y 1 And e.Y 25 Then '红框的坐标范围，在这个范围内右击有效（获取的技巧见下面） Form2.ShowDialog() End If End If 小技巧： 如何获取你限定的红色框的范围？ 用mousemove事件和一个label控件做测试： Private Sub Form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove Label1.Text = e.X "=" e.Y End Sub 记录下坐标即可！
你是想使用右键菜单吧？
例如给picturebox添加右键菜单可以这样：
从工具箱拖一个ContextMenuStrip到窗体上，然后自己添加你喜欢的菜单项，然后把PictureBox的ContextMenuStrip属性设置为你你刚添加的哪个ContextMenuStrip，下拉列表里会有你刚刚添加的控件的！
如果是窗体右键单击事件，是
Private Sub Form1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseClick
If e.Button = Windows.Forms.MouseButtons.Right Then
'这里写你要的代码
End If
End Sub
但是如果只是右键单击就弹出菜单的话没必要这样，只需要在窗体上放置一个ContextMenuStrip控件，然后在Form的ContextMenuStrip属性中绑定这个控件就可以了。
需要设置一个右键菜单单击的类，然后用集合把所有菜单事件组合起来。百度一下VB6，MyApp.CommandBars("Cell").Controls.Add(MsoControlType.msoControlButton, Before:=1)，基本代码都有了
