从VB调用查询

Question

我试图从VB中调用Access中的查询但是遇到了一些问题。这是代码：

 Dim myQuery As QueryDefs
 myQuery("2012Patient_q").Execute

但这不起作用。我试着谷歌搜索但无济于事。我在这里失踪了什么？

由于

Answer 1

代码应该是这样的：

Dim myQuery As QueryDef        ' no "s"
Set myQuery = CurrentDB.QueryDefs("2012Patient_q")
myQuery.Execute

或者，简单地说没有任何中间变量：

CurrentDB.QueryDefs("2012Patient_q").Execute