我正在尝试更新Access VBA中的表中的一些字段

我需要一些帮助,对不起,我是新的VBA,我想运行一个更新查询应该从variables中获取一个值,并更新已经存在的表。 这是使用VBA完成的。 在执行没有错误消息显示,但表不会更新新的值。 代码如下:

Query = "UPDATE Results " & _ "SET fk_Report='" & Report & "'" & _ ",fk_Name='" & Namevar & "'" & _ ",fk_Age='" & Agevar & "'" & _ ",fk_Sex='" & Sexvar & "'" & _ "WHERE [Count]='" & Countvar & "'" & _ ",[Positives]='" & Posvar & "'" & _ ",[Negatives]='" & Negvar & "'" & _ ",[Unknow]='" & Unkvar & "';" CurrentDb.Execute (Query) 

如果有人可以帮助…

where子句中不需要逗号

 Query = "UPDATE Results " & _ "SET fk_Report='" & Report & "'" & _ ",fk_Name='" & Namevar & "'" & _ ",fk_Age='" & Agevar & "'" & _ ",fk_Sex='" & Sexvar & "'" & _ "WHERE [Count]='" & Countvar & "' " & _ "AND [Positives]='" & Posvar & "' " & _ "AND [Negatives]='" & Negvar & "' " & _ "AND [Unknow]='" & Unkvar & "';" CurrentDb.Execute (Query) 

在WHERE子句之后使用AND而不是(逗号)