FAQ:如何用代码设置始终显示整个菜单

时　间:2007-12-11 08:36:02
作　者:竹笛   ID：8  城市：上海  QQ：2851379730
摘　要:如何用代码设置始终显示整个菜单
正　文:

(Q)在 Access 2003 专业版环境中，我可以通过菜单“自定义”窗口，设置“始终显示整个菜单”。但当我把程序打包成 mde 文件发布出去后，发现用户那里的菜单又缩起来了。我想问一下，有什么办法可以让用户那里也能够“始终显示整个菜单”呢？通过代码或注册表方式都可以。

(A)根据您的描述，我对您问题的理解是您希望通过代码或者注册表的方式来实现“Always shows full menus”（即始终显示整个菜单）。不知道我理解的正确吗？如果我理解得不够准确，请让我知道尽可能多对问题的描述，以便我能全面理解您的问题并且能够更快解决问题。

根据我的经验，您可以通过下列代码来实现该功能
选中“始终显示整个菜单”
Application.CommandBars.AdaptiveMenus = False

不选中“始终显示整个菜单”
Application.CommandBars.AdaptiveMenus = True