把菜单写在MDI主窗体上,并设隐藏 在调用窗体上申明public过程,主窗体调用相应窗体过程即可 如: 'MDI主窗体frmmain private sub Menu_Add() call form1.menuadd() end sub 'form1子窗体 public sub menuadd() msgbox "" end sub private sub form_Mousedown(.......) if button=2 then popupmenu frmmain.menu_add end if end sub
jiemupig(伦涯飘) 如何把pop menu写在控件上面,能不能详细一点,先谢了
fishmans(金脚指) 主窗体已经有一个菜单了,还能在添加吗? 或许我没有理解你的意思
'form1子窗体 public sub menuadd() msgbox "" end sub private sub form_Mousedown(.......) if button=2 then popupmenu frmmain.menu_add'''注意这一句,在子窗体中调用MDI中的菜单 end if end sub
在调用窗体上申明public过程,主窗体调用相应窗体过程即可
如:
'MDI主窗体frmmain
private sub Menu_Add()
call form1.menuadd()
end sub 'form1子窗体
public sub menuadd()
msgbox ""
end sub
private sub form_Mousedown(.......)
if button=2 then
popupmenu frmmain.menu_add
end if
end sub
public sub menuadd()
msgbox ""
end sub
private sub form_Mousedown(.......)
if button=2 then
popupmenu frmmain.menu_add'''注意这一句,在子窗体中调用MDI中的菜单
end if
end sub