用一个好论坛 请求一个极其简单关于VB菜单的问题，UP都有分

Question

问题是这样的：
　　一个仓库管理系统，主菜单共有5项：物品基本资料，入库操作，出库操作，库存查询，系统管理　　
　　要求实现的功能：当打开任一主菜单中的任一子菜单时，主菜单锁定（即无法点击主菜单其它任意菜单），当这个子菜单退出时，主菜单恢复原样，请教最好最简洁的解决方法（代码短，使用方便）

Answer 1

mnuMain.enable=false 可不可以？

Answer 2

在子菜单的单击时间（click）中，设置要锁定的菜单如楼主所说，mnu***.enabled=false；在子菜单退出事件中设置mnu***.enabled=true

Answer 3

在你的每個窗體中定義：
Public Event CanUse(active As Boolean)
－－－－－－－－－－－－－－－－－－－－－
當你的窗體退出時就：RaiseEvent CanUse(True)-
在你的Mdi窗體中設置：
 sub yourFrom_CanUse(byval r as boolean) end sub

Answer 4

在你的每個窗體中定義：
Public Event CanUse(active As Boolean)
－－－－－－－－－－－－－－－－－－－－－
當你的窗體退出時就：RaiseEvent CanUse(True)-
在你的Mdi窗體中設置：
 sub yourFrom_CanUse(byval r as boolean)
     mdi.enabled=r
 end sub