执行查询语句的方法:

1.推荐使用下列方法:

CurrentDb.Execute (" Update 字段名 SET 条件")

 2.关闭警告

DoCmd.SetWarnings False     '关闭警告
DoCmd.RunSQL (" Update 字段名 SET 条件")
DoCmd.SetWarnings True      '打开警告