方法一:

　　Microsoft Office 的命令栏对象

　　Microsoft Office 的命令栏对象，对应于菜单和工具栏。

　　在OFFICE家族中，所有菜单和工具栏的对象模型都作为CommandBars命令栏对象被保存在共享的Microsoft Office 9.0 Object Library对象中

　　'恢复默认菜单和工具栏，搞定！

　　'Microsoft Office 9.0 Object Library

　　Public Sub EnableDefaultMenu()

　　'定义命令对象

　　Dim oBar As CommandBar

　　Set oBar = CommandBars("Menu Bar")

　　oBar.Reset

　　End Sub

　　注：Menu Bar是指access的主菜单

　　方法二:

　　Public Sub EnableDefaultMenu()

　　On Error Resume Next

　　Dim obar As CommandBar

　　For Each obar In Application.CommandBars

　　obar.Reset

　　Next

　　End Sub

　　相关链接：

　　2008年下半年全国计算机等级考试报名信息汇总

　　更多信息请访问：计算机等级考试站　计算机等级考试在线题库　计算机等级考试论坛