用代码设置ACCESS选项卡.doc

用代码设置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 Sub-ChangeProperty 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显示，任务栏中的窗口 ShowWindowsInTaskbar在宏设计中显示，名称列 Show Macro Names Column在宏设计中显示，条件列 Show Conditions Column数据库窗口中的鼠标动作 Database Explorer Click Behavior“常规”选项卡选项文本 字符串参数打印边距，左边距 Left Margin打印边距，右边距 Right Margin打印边距，上边距 Top Margin打印边距，底边距 Bottom Margin使用四位数年份格式，仅这一个数据库 Four-Digit Year Formatting使用四位数年份格式，所有数据库 Four-Digit Year Formatting All Databases名称自动更正，跟踪名称自动更正信息 Track Name AutoCorrect Info名称自动更正，执行名称自动更正 Perform Name AutoCorrect名称自动更正，记录名称自动更正的更改情况 Log Name AutoCorrect Changes最近使用的文件列表 Enable MRU File List最近使用的文件列表，（文件个数） Size of MRU File List提供有声音的反馈 Provide Feedback with Sound关闭时压缩 Auto Compact新建数据库排序次序 New Database Sort Order删除该文件中的个人信息 Remove Personal Information默认数据库文件夹 Default Database Directory“编辑/查找”选项卡选项文本 字符串参数默认查找/替换行为 Default Find/Replace Behavior确认，记录更改 Confirm Record Changes确认，删除文档 Confirm Document Deletions确认，操作查询 Confirm Action Queries显示值列表于，局部索引字段 Show Values in Indexed显示值列表于，局部非索引字段 Show Values in Non-Indexed显示值列表于，ODBC 字段 Show Values in Remote显示值列表于，本地快照中的记录 Show Values in Snapshot显示值列表于，服务器中的记录 Show Values in Server读取记录超过该数目时不再显示列表 Show Values Limit“数据表”选项卡选项文本 字符串参数默认颜色，字体 Default Font Color默认颜色，背景 Default Background Color默认颜色，网格线 Default Gridlines Color默认网格线显示方式，水平方向 Default Gridlines Horizontal默认网格线显示方式，垂直方向 Default Gridlines Vertical默认列宽 Default Column Width默认字体，字体 Default Font Name默认字体，粗细 Default Font Weight默认字体，字号 Default Font Size默认字体，下划线 Default Font Underline默认字体，倾斜 Default Font Italic默认单元格效果 Default Cell Effect动画显示 Show Animations“键盘”选项卡选项文本 字符串参数按 Enter 键后光标移动方式 Move After Enter进入字段时的行为 Behavior Entering Field箭头键行为 Arrow Key Behavior光标停在第一个/最后一个字段上 Cursor Stops at First/Last Field自动提交 Ime Autocommit数据表输入法控件 Datasheet Ime Control“表/查询”选项卡选项文本 字符串参数表设计，默认字段大小，文本 Default Text Field Size表设计，默认字段大小，数字 Default Number Field Size表设计，默认字段类型 Default Field Type表设计，在导入/创建时自动索引 AutoIndex on Import/Create查询设计，显示表名称 Show Table Names查询设计，输出所有字段 Output All Fields查询设计，启用自动联接功能 Enable AutoJoin查询设计，运行权限 Run Permissions查询设计，SQL Server 兼容语法 (ANSI 92)，当前数据库 ANSI Query Mode查询设计，SQL Server 兼容语法 (ANSI 92)，作为新数据库的默认设置 ANSI Query Mode Default“窗体/报表”选项卡选项文本 字符串参数选定行为 Selection Behavior窗体模板 Form Template报表模板 Report Template始终使用事件过程 Always Use Event Procedures“高级”选项卡选项文本 字符串参数DDE 操作，忽略 DDE 请求 Ignore DDE RequestsDDE 操作，启动 DDE 刷新功能 Enable DDE Refresh默认文件格式 Default File Format客户服务器设置，默认的最大记录数 Row Limit默认打开模式 Default Open Mode for Databases命令行参数 Command-Line ArgumentsOLE/DDE 超时 OLE/DDE Timeout (sec)默认记录锁定 Default Record Locking刷新间隔 Refresh Interval (sec)更新重试的次数 Number of Update RetriesODBC 刷新间隔 ODBC Refresh Interval (sec)更新重试时间间隔 Update Retry Interval (msec)使用记录级锁定打开数据库 Use Row Level Locking保存登录和密码 Save Login and Password“页”选项卡选项文本 字符串参数默认设计器属性，节缩进 Section Indent默认设计器属性，可选行颜色 Alternate Row Color默认设计器属性，标题节样式 Caption Section Style默认设计器属性，页脚节样式 Footer Section Style默认数据库/项目属性，使用默认页文件夹 Use Default Page Folder默认数据库/项目属性，默认页文件夹 Default Page Folder默认数据库/项目属性，使用默认的连接文件 Use Default Connection File默认数据库/项目属性，默认连接文件 Default Connection File“拼写检查”选项卡选项文本 字符串参数词典语言 Spelling dictionary language将词添至 Spelling add words to仅根据主词典提供建议 Spelling suggest from main dictionary only忽略全部大写的单词 Spelling ignore words in UPPERCASE忽略带数字的单词 Spelling ignore words with number忽略 Internet 和文件地址 Spelling ignore Internet and file addresses语言详细信息，德语：使用后期修订规则 Spelling use German post-reform rules语言详细信息，朝鲜语：合并助动词/形容词 Spelling combine aux verb/adj语言详细信息，朝鲜语：使用自动更改列表 Spelling use auto-change list语言详细信息，朝鲜语：处理复合名词 Spelling process compound nouns语言详细信息，希伯来语模式 Spelling Hebrew modes语言详细信