如何用VBA代码设置“工具”--“选项”--“编辑/查找”的参数

zhongchen

如何用VBA代码设置“工具”--“选项”--“编辑/查找”里有：

“记录更改”、“删除文档”、“操作查询”，全部都不选中。

请问如何用代码编写？

hi-wzj

请根据需要选择使用。With Application

            '禁止显示系统启动时的文件确认对话框。

            .SetOption "显示“启动”对话框", False

   

            '禁止显示系统对象。

            .SetOption "Show Status Bar", True

            .SetOption "确认文档删除", False

            .SetOption "确认记录更改", False

            .SetOption "确认操作查询", True

   

            '取消对数据库列表的限制。

            .SetOption "Show Values Limit", 0

   

            '显示为长日期。

            .SetOption "Four-Digit Year Formatting", True

   

            '退出时自动压缩数据库。

            .SetOption "Auto Compact", True

   

            '在任务栏中显示窗口

            '.SetOption "在任务栏中显示窗口", False

            

            '禁止显示隐藏的对象。

            .SetOption "Show Hidden Objects", False

            .SetOption "Show System Objects", False

            .SetOption "显示新建对象快捷方式", False

            '显示新建对象快捷方式

            

            '设置系统标题。

            .SetOption "roject Name", "远程数据管理"

            '"erform Name AutoCorrect"

            '"Log Name AutoCorrect Changes"

            

            '设定设计数据库时字段的默认类型。

            '"Default Field Type"

            'Form Template

            'Selection Behavior

            '设定打印边距。

            '"Left Margin"

            

            UpdateKey HKEY_CURRENT_USER, _

                "MyAccess\CIS\vbaSys", "Installed", 1

        End With

zhongchen

太全面了！谢谢！