用代码设置ACCESS选项卡（副本）.docVIP

用代码设置ACCESS选项卡 2008年05月20日 星期二 13:43 代码为Application.SetOption ”选项名“，选项值Application.SetOption Show Status Bar, False Application.SetOption Show Startup Dialog Box, False 设置确认记录更改，删除，执行操作查询Public Sub kkkk()Application.SetOption Show Startup Dialog Box, False 不显示启动任务窗口Application.SetOption Confirm Record Changes, False 确认，记录更改Application.SetOption Confirm Document Deletions, False 确认，删除文档??????? Application.SetOption Confirm Action Queries, False 确认，操作查询End SubChangeProperty StartupForm, DB_Text, Customers??? 显示数据库窗口??? ChangeProperty StartupShowDBWindow, DB_Boolean, False??? 显示状态栏??? ChangeProperty StartupShowStatusBar, DB_Boolean, False??? 允许内置工具栏??? ChangeProperty AllowBuiltinToolbars, DB_Boolean, False??? 允许全部菜单??? ChangeProperty AllowFullMenus, DB_Boolean, False??? 指定模块在发生运行错误之后，用户是否可以查看 Visual Basic 代码。??? ChangeProperty AllowBreakIntoCode, DB_Boolean, False??? 指定是否启用或禁用特殊组合键（Alt+F1 (F11)、CTRL+F11、CTRL+BREAK 及 CTRL+G ) 。例如，可以设置 AllowSpecialKeys 属性以阻止用户通过按 F11 键显示“数据库”窗口；按 Ctrl+Break 组合键在 Visual Basic 模块 中进入中断模式；或者按 Ctrl+G 组合键显示“立即”窗口。??? ChangeProperty AllowSpecialKeys, DB_Boolean, False??? 用 AllowBypassKey 属性可指定是否允许使用 Shift 键来忽略启动属性和 AutoExec 宏??? ChangeProperty AllowBypassKey, DB_Boolean, False*********************************************************************************　　我们做好程序分发给他人使用时，可能别人的ACCESS系统环境跟你的不一样，并会导致很多麻烦问题，最明显的就是：当你在程序中执行某个操作查询(更新、删除、追加、生成表)时,会弹出一些恼人的提示信息让你确认。 ?? 其实，我们完全可以在代码中对ACCESS的运行环境进行设置，语法为 　　SetOption(OptionName, Setting) 　　从 Visual Basic 中设置选项使用 SetOption 和 GetOption 方法可以从代码中设置和返回“选项”对话框中的选项值。若要查看“选项”对话框，可单击“工具”菜单上的“选项”。下表列出所有可以由代码设置或返回的选项名称，以及它们在“选项”对话框中所处的选项卡，后面是必须传递给 SetOption 或 GetOption 方法的相应的字符串参数。**************************************（前面为中文名字，后面为英文名子） ************************************** “视图”选项卡选项文本和对应的字符串参数显示，状态栏??????? Show Status Bar显示，启动任务窗格??????? Show Startup Dialog Box显示，新建对象快捷方式??????? Show New Object Shortcuts显示，隐藏的对象??????? Show Hidden Objects显示，系统对象??????? Show System Objects