接上一个问题：如何在MDI的子窗体中实现弹出式菜单？

Question

是不是一定要在子窗体中定义一个菜单？
可是这样一来，子窗体显示的时候就覆盖了MDI的菜单了。为了不覆盖MDI菜单、又能够在子窗体上用右键弹出菜单，应该怎么实现？

Answer 1

不用重新定义菜单，只要在弹出的时候说明是那个菜单就可以用了
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then Me.PopupMenu MDIForm1.mnuFile
End Sub

Answer 2

把所有弹出菜单都放到MDI窗体中并隐藏起来，然后在子窗体中调用楼上的代码弹出菜单即可！