下面的vba代码中是否缺少运算符?
我试图运行下面的代码,但第3行出现语法错误(缺少运算符)。我想不出少了什么下面的vba代码中是否缺少运算符?,vba,ms-access,Vba,Ms Access,我试图运行下面的代码,但第3行出现语法错误(缺少运算符)。我想不出少了什么 Dim mains As Recordset Set mains = CurrentDb.OpenRecordset("MAIN CAMPUS MINOR POSITION APPLICANTS", dbOpenSnapshot, dbReadOnly) mains.FindFirst "1st SECONDER='" & Nz(Me.txtmain, "&qu
Dim mains As Recordset
Set mains = CurrentDb.OpenRecordset("MAIN CAMPUS MINOR POSITION APPLICANTS", dbOpenSnapshot, dbReadOnly)
mains.FindFirst "1st SECONDER='" & Nz(Me.txtmain, "") & "'"
If mains.NoMatch = True Then
Me.txtmain.BackColor = vbGreen
txtnakuru.SetFocus
Else
MsgBox "Duplicate First Seconder. Please Revise your Seconders.", vbExclamation, ""
Me.txtmain.Value = ""
我可能会建议什么。在包含空格的字段中添加括号,
[主校区次要职位申请者]
和[第一个借调者]
。更好的是,不要在命名约定中使用空格、标点符号/特殊字符或全大写:maincampusminorpositionapplicators
,lstSeconder
。