我已经浏览了类似的帖子,并且无法在这里找出导致我的错误的确切原因.从我可以告诉我的语法是正确的,我已经包含了我的构建代码,它正常运行直到执行SQL行.
rs.MoveFirst
If Me.chkBBB = True Then
Do Until rs.EOF
strBBB = rs!BBB
strBrktDet1 = Left(strBBB, 2)
strBrktDet2 = Right(strBBB, 8)
If strBrktDet1 = "99" Then varBracket = -1
If strBrktDet1 = "98" Then varBracket = 0
strBPINo = Nz(DLookup("[BPINo]", "[Caliper Master]", "[BBB] LIKE" & "'*" & strBrktDet2 & "'"), "N/A")
strCentric = Nz(DLookup("[CentricItemNo]", "[Caliper Master]", "[BBB] LIKE" & "'*" & strBrktDet2 & "'"), "N/A")
strCardoneNo = Nz(DLookup("[A1CardoneItemNo]", "[Caliper Master]", "[BBB] LIKE" & "'*" & strBrktDet2 & "'"), "N/A")
If …Run Code Online (Sandbox Code Playgroud)