用代码设置ACCESS选项卡_access窗体及access控件

用代码设置ACCESS选项卡

时间：2009-07-18 08:53 来源：www.accesssoft.com 作者：jingyu 阅读：次

代码为 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 Requests DDE 操作，启动 DDE 刷新功能 Enable DDE Refresh 默认文件格式 Default File Format 客户服务器设置，默认的最大记录数 Row Limit 默认打开模式 Default Open Mode for Databases 命令行参数 Command-Line Arguments OLE/DDE 超时 OLE/DDE Timeout (sec) 默认记录锁定 Default Record Locking 刷新间隔 Refresh Interval (sec) 更新重试的次数 Number of Update Retries ODBC 刷新间隔 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 语言详细信息，阿拉伯语模式 Spelling Arabic modes 注意如果正在开发一个数据库应用程序、加载项、类库数据库或引用数据库，那么在完成代码的调试后，应确保“错误捕获”选项设为 2（“无法处理错误时中断”）。作为 setting 参数传递给 SetOption 方法的值取决于正在设置的选项类型。下表提供了设置选项的一些指导。如果选项是那么 setting 参数为文本框字符串复选框布尔值：True (-1) 或 False (0) 选项组中的选项按钮或者组合框或列表框中的选项整型值，对应于选项在选项组或列表中的位置（从零 [0] 开始）

(责任编辑：admin)

顶一下

(0)

踩一下

(0)

上一篇：根据查找窗体设定的条件筛选主窗体的数据内容代码
下一篇：主子窗体记录同步