如何取消操作查询的警告提示-DoCmd.SetWarnings False

http://www.accessoft.com/article-show.asp?id=8595

Private Sub 有提示_Click()
DoCmd.RunSQL "Update 表 SET 字段 = '123' " ' 运行更新查询
MsgBox "完成"
End Sub

Private Sub 无提示1_Click()
    DoCmd.SetWarnings False                               ' 取消系统提示
    DoCmd.RunSQL "Update 表 SET 字段 = '123' "            ' 运行更新查询
    DoCmd.SetWarnings True                                ' 恢复系统提示
    MsgBox "完成"
End Sub

Private Sub 无提示2_Click()
CurrentDb.Execute "Update 表 SET 字段 = '123' " ' 用CurrentDb对象执行更新查询
MsgBox "完成"
End Sub

Top

总记录：2篇页次：1/1 9 1 :

Access交流中心

求解：打开窗体就自动执行查询更新，查询更新的确认框不用弹出来，自动选"是"，实现不卡顿直接进窗体。

如何取消操作查询的警告提示-DoCmd.SetWarnings False