SQL语法问题MS Access VBA

Question

我遇到语法问题： 我将其从SQL Design View转移到了VBA。 [area]是数字。我只是要求你们做一些粗略的评论，并告诉我是否有任何事情发生在你身上。

article

Answer 1

您无法将DoCmd.RunSQL与SELECT查询一起使用。

来自 DoCmd.RunSQL方法帮助主题...

  

字符串表达式，它是操作查询的有效SQL语句   或数据定义查询。它使用INSERT INTO，DELETE，   SELECT ... INTO，UPDATE，CREATE TABLE，ALTER TABLE，DROP TABLE，CREATE   INDEX或DROP INDEX语句。如果您愿意，请包含IN子句   访问另一个数据库。

如果您打算在数据表视图中查看该查询的结果，请使用其SQL创建保存的查询。

Dim db As DAO.Database
Dim qdf As DAO.QueryDef
Dim strSelect As String

strSelect = "SELECT ... blah, blah, blah"
Debug.Print strSelect '<- inspect this in Immediate window; Ctrl+g will take you there
Set db = CurrentDb
Set qdf = db.CreateQueryDef("YourQueryNameHere", strSelect)

然后，您可以使用DoCmd.OpenQuery ...

打开已保存的查询

DoCmd.OpenQuery "YourQueryNameHere"