该错误消息具有误导性。真正的问题是，
DoCmd.RunSQL是为“行动”的查询：
UPDATe;
INSERT;
DELETE; 等等。
它不会接受普通
SELECT查询。例如，这个简单的
SELECT查询给了我同样的 “A RunSQL操作需要由一个SQL语句的参数”
消息来自
DoCmd.RunSQL：
Dim SQLstr As StringSQLstr = "SELECT * FROM tblFoo;"DoCmd.RunSQL SQLstr
但是，
DoCmd.RunSQL执行此有效
UPDATE语句时不会出现错误：
SQLstr = "UPDATE tblFoo SET long_text='bar' WHERe id=1;"DoCmd.RunSQL SQLstr
您需要使用其他方法来使用您的
SELECT查询。方法的选择取决于您要对查询返回的结果执行的操作。
