这段代码为何无法运行？

scv

提示我 from子句语法错误！我没看出哪里错了。

DoCmd.OpenTable "tblCategory"

    SQL = "SELECT tblCategory.残值率, tblCategory.资产类别 FROM tblCategory" & _
            "WHERE tblCategory.资产类别=Form_frmAddNewCard.资产类别;"

    DoCmd.RunSQL SQL

该贴已经同步到 scv的微博

guzhen9315

    Sql = "SELECT tblCategory.残值率, tblCategory.资产类别 FROM tblCategory WHERE tblCategory.资产类别=Form_frmAddNewCard.资产类别;"

这个我不懂，但是不是少了一个空格？

scv

好像不是这个原因。

GLW

除二楼原因外


SQL = "SELECT tblCategory.残值率, tblCategory.资产类别 FROM tblCategory " & _
            "WHERE tblCategory.资产类别=" & Form_frmAddNewCard.资产类别;
如果资产类别为数值用以上sql
如果为文本型用如下sql

SQL = "SELECT tblCategory.残值率, tblCategory.资产类别 FROM tblCategory " & _
            "WHERE tblCategory.资产类别='" & Form_frmAddNewCard.资产类别 & "'"

ASLXT

在 Visual Basic 中，RunSQL 方法执行 RunSQL 操作。

expression.RunSQL(SQLStatement, UseTransaction)
expression      必需。返回“应用于”列表中的一个对象的表达式。

SQLStatement   必需 Variant 型。字符串表达式，表示操作查询或数据定义查询的有效 SQL 语句。它使用 INSERT INTO、DELETE、SELECT...INTO、UPDATE、CREATE TABLE、ALTER TABLE、DROP TABLE、CREATE INDEX 或 DROP INDEX 语句。如果要访问其他数据库，则应包含 IN 子句。

UseTransaction     可选 Variant 型。使用 True (-1) 可以在事务处理中包含该查询。 如果不想使用事务处理，则应将该参数设为 False (0)。如果将该参数留空，则采用默认值 (True)。

ASLXT

你的查询属于选择查询！
要操作查询或数据定义查询才可以。

scv

还真是少了个空格。
另外我没有添加ado，我真是初学。