用VB一个登录界面,怎么设置菜单的可用和无用?

菜单中各个菜单都有名称，这个在属性中可以查到，例如菜单名称分别是“文件”、“编辑”。
注意：不是菜单标题，菜单名称一般都是字符，不是汉字，菜单标题一般是汉字！

在Form_Load事件中添加如下代码：
Me.文件(1) = False
Me.编辑(2) = False
这样“菜单就是灰色的无用的”。

在登录成功后，添加下面代码：
Me.文件(1) = True
Me.编辑(2) = True
这样“菜单就是黑色的可用的”。

说明：只需要主菜单即可，下拉菜单不用管他。

菜单名.Enable = false 禁用
菜单名.Enable = True 启用