天瑞科技 - 深圳电脑维修，深圳电脑维护，深圳电脑修理， 上门维修电脑，深圳电脑上门维修

天瑞电脑公司　　正在为您转接...

在“工具”---“启动”里打完所有的勾，程序启动之后还是会留下一个主菜单：

如何让它消失，只留下自定义的菜单呢？


用CommandBars集合！下面的这段程序就可以达到这个目的：
Dim cbar
For Each cbar In CommandBars
If cbar.Name = "Menu Bar" Then
cbar.enabled=false
End If
Next
看到这里，你一定会问：我怎么知道菜单栏的名字就是"Menu Bar"？或是我想用代码隐藏别的工具栏又怎么知道它的名字？
运行一下下面这段程序，将会在立即窗口看到所有被设置显示的菜单及工具栏的名称、当前语言描述及显示与否的状态。
Dim cbar
For Each cbar In CommandBars
If cbar.Visible = True Then
Debug.Print cbar.Name, cbar.NameLocal, cbar.Visible
End If
Next
其中Name就是程序中要引用的名称，NameLocal就是用当前版本的语言来描述的名称，如果你用的是简体版本，就用简体版本的名称描述出来，比如"Menu Bar"，它的NameLocal就是“菜单栏”。