原文地址:http://bcd.accxp.com/index.asp?Main=10&ArtID=6
作 者：林海群,朱亦文
发布日期：2002年10月30日
摘 要：通过对Microsoft Office 9.0 Object Library(OFFICE 2000)/Microsoft Office 10.0 Object Library(OFFICE XP)的引用, 重新恢复access的默认菜单.
正 文：
朱亦文的方法:
Microsoft Office 的命令栏对象
Microsoft Office 的命令栏对象，对应于菜单和工具栏。
在OFFICE家族中，所有菜单和工具栏的对象模型都作为CommandBars命令栏对象被保存在共享的Microsoft Office 9.0 Object Library对象中，如图：
| ' 恢复默认菜单和工具栏，搞定！ ' Microsoft Office 9.0 Object Library Public Sub EnableDefaultMenu() Set oBar = CommandBars("Menu Bar") |
注：Menu Bar是指access的主菜单
林海群的方法:
| Public Sub EnableDefaultMenu() On Error Resume Next Dim obar As CommandBar For Each obar In Application.CommandBars |
