VB中怎样添加右键菜单

说的详细一下,采用什么控件最好说清楚,谢谢了,还有代码,

2024-12-02 10:28:56

推荐回答（1个）

回答1：

请进行如下操作。
打开“菜单编辑器”，按常规方法添加菜单。例如：
－－－－－－－－－－－
菜单 (名称为mnuPop)
....菜单1 (名称为mnuPop1)
....菜单2 (名称为mnuPop2)
－－－－－－－－－－－
把“标题”菜单的“可见”复选框去掉。
添加如下代码：
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbKeyRButton Then PopupMenu mnuPop
End Sub
绝对没问题。