怎么在窗口中添加右击菜单？

Question

怎么在窗口中添加右击菜单？

Answer 1

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then Me.PopupMenu hide1
End Sub

Answer 2

1.在菜单编辑器中设计一个菜单,名称为MEA,并将可见的勾去掉.
2.在窗体中使用如下代码:
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Button = 2 Then PopupMenu MEA
End Sub

Answer 3

在设计模式下先建一个隐藏菜单,然后在需要弹出菜单的地方通过PopupMenu弹出

Answer 4

1设计器下建立一个菜单，把visible去掉，然后给它建立一个子菜单2在需要的地方popupmenu 主菜单名字