试图使用VB来自动化一些查询.遇到看起来像字符串问题的东西

Jef*_*eff 0 sql ms-access vba ms-access-2003

我正在使用MS Access 2003,我正在尝试使用VB一次执行一些查询.当我在SQL中写出查询时,它工作正常,但是当我尝试在VB中执行它时,它要求我为DEPA"输入参数值",然后是DND(这是我拥有的两个字符串的前几个字母).这是代码:

Option Compare Database

Public Sub RemoveDupelicateDepartments()

Dim oldID As String
Dim newID As String
Dim sqlStatement As String


oldID = "DND-01"
newID = "DEPA-04"

sqlStatement = "UPDATE [Clean student table] SET [HomeDepartment]=" & newID & " WHERE [HomeDepartment]=" & oldID & ";"

DoCmd.RunSQL sqlStatement & ""

End Sub
Run Code Online (Sandbox Code Playgroud)

它看起来好像它正在接受字符串 - 然后没有别的.我不知道,这就是为什么我要问哈哈.我的代码应该是什么样的?

vol*_*ody 5

使用(')字符设置值的开始和结束

sqlStatement = "UPDATE [Clean student
table] SET [HomeDepartment]='" & newID
& "' WHERE [HomeDepartment]='" & oldID
& "';"
Run Code Online (Sandbox Code Playgroud)