求助：请大侠帮我看看DLOOKUP问题出在哪里

henryWEN

我在半成品入库窗体中，输入的半成品工艺编号在半成品入库库存查询中，并且它的库存=0的情况下才允许入库。

Function m_zhuijia()
If MsgBox("[" & Forms![半成品入库]![入库半成品工艺编号] & "] 此半成品要入库吗？", vbYesNo + vbInformation, "半成品入库") = vbYes Then
    If IsNull(Forms![半成品入库]![入库半成品工艺编号]) Then
        Beep
        MsgBox "请输入产品工艺编号.", vbOKOnly + vbExclamation存
        Forms![半成品入库]![入库半成品工艺编号].SetFocus
        Exit Function
    End If
    If IsNull(DLookup("[入库半成品工艺]", "半成品入库库存查询", " [入库半成品工艺编号]=" & Forms![半成品入库]![入库半成品工艺编号] "And [库存数]＝0"")) Then
      
       MsgBox " 此道工艺产品在半成品库存中还有库存，请先出库后合并再入库"
        DoCmd.RunCommand acCmdSelectRecord
        DoCmd.RunCommand acCmdSaveRecord
        DoCmd.RunCommand acCmdRecordsGoToNew
        Else
        MsgBox "此产品"
        Exit Function
    End If
End If
End Function


If IsNull(DLookup("[入库半成品工艺]", "半成品入库库存查询", " [入库半成品工艺编号]=" & Forms![半成品入库]![入库半成品工艺编号] "And [库存数]＝0"")) Then

zhengjialon

And [库存数]＝ 中的AND前面没有空格吧？

zhengjialon

“前面还少个& 编号如果是文本的要加单引号

henryWEN

前面加了&,去掉了空格，运行后，出现错误3075， 语法错码（操作符丢失）在查询表达式'[入库半成品工艺编号]=1626114500-1and[库存数]=0'中。谢谢大侠

henryWEN

因我是初学，向各位大侠多多请教，谢谢

zhengjialon

我的意思是要空格的，你本来少了个空格，结果现在你又多删除了空格。。

leijiqiang

6# zhengjialon