如何消除生成表查询的提示

九面　发表于：2010-07-04 21:13:17 　

请教各位老师：

我设计的数据库中每次执行操作查询时总有些提示性对话框弹出（比如生成表查询时，提示：确实要执行该操作查询码？执行查询前要删除表，是否继续等），如果在菜单栏中---工具--选项---编辑/查找---确认--下的三个复选框去掉选择，再操作查询时就不会出现那些对话框了，但我换台电脑，更换的电脑上那三个复选框如果原先被选择的话，我运行数据库的操作查询时，那些提示性对话框又出现了。在执行操作查询时使用什么样的代码，可以防止这些对话框出现，不论是否换电脑，还是菜单栏中的选择项是否被选择，

Top

wj.s 发表于：2010-07-04 23:32:43

有两个方法:

1.把操作转化为SQL语句,直接在VBA代码中执行,并屏蔽系统提示:

' 屏蔽系统消息
DoCmd.SetWarnings False

DoCmd.RunSQL ("操作查询的SQL语句")

'打开系统消息
DoCmd.SetWarnings True

注:操作查询的SQL语句可以快速获得的,生成操作查询->设计视图->SQL视图

2.直接通过VBA的SetOption方法修改选项中[编辑/查找]的确认项目,你可以在启动窗体的加载事件中加入代码达成.

见如下附件:

点击下载此附件