Question

我正在努力使查询1根据是否选中任务值（从另一个表中获取）插入3个字段中的1个（true或false复选框）。这部分有效。

查询2应该更新组合框中值为空的其他2个字段。这部分不起作用。从语法上看，这似乎是正确的，并没有崩溃。但我不认为它首先是在阅读它。

所有这一切都应该通过点击一下按钮来完成。

查询1：

Sub DBInsert_SkillMatrix()
sSQL = "Insert into tblSkillMatrix (Task) Select Task from tblTask WHERE Selected = true"
Set db = CurrentDb
db.Execute (sSQL)
db.Close
End Sub

查询2：

Sub DBUpdate_SkillMatrix()
Dim db As DAO.Database
sSQL = "UPDATE tblSkillMatrix SET Skill = '" & Me.cboAST_Skill & "', Requirement = '" & Me.cboAST_Requirement & "' WHERE Skill = ''"
Set db = CurrentDb
Debug.Print (sSQL)
db.Execute (sSQL)
End Sub

Answer 1

错误是在where where子句中。应该是ISNULL。以下是如何使用它的指导 - https://msdn.microsoft.com/en-us/library/ms184325.aspx

在VBA中添加/更新sql表

1 个答案: