在MS Access VBA中，如何使用参数调用存储的附加查询？

Question

在我的Access 2007数据库中，我有一个带有参数的追加查询。如何从VBA脚本调用此查询？

我意识到我可以直接在VBA代码中生成查询文本，但这更加尴尬。

Answer 1

我得到了以下工作：

Dim db As DAO.Database 
Dim qry As DAO.QueryDef 

Set db = CurrentDb 

Set qry= db.QueryDefs("NameOfMyStoredQuery") 

qry.Parameters(0) = FirstParamValue 
qry.Parameters(1) = SecondParamValue 
qry.Parameters(2) = ThirdParamValue 

qry.Execute