无效调用NULL值

Jerry_Z　发表于：2014-03-20 18:11:10 　

从表"dbo_MAX最新准备单号"里找“准备单号”的字段，条件是设备号=A

如果有值，还是会往下跑的，但是如果没有，也就是说是NULL值，它会报错调用无效NULL值

我的问题是：有没有方法让它不报错?让它直接跑进ISNULL(B)的条件里？

不多说了贴代码了

Private Sub LP_05_Click()
    DoCmd.SetWarnings False
    A = "LP-05"
    B = DLookup("准备单号", "dbo_MAX最新准备单", "设备号 = '" & A & "' ")
    If IsNull(B) Or B = "" Then
        MsgBox "此设备未装模，请联系现场管理！", vbOKOnly, "系统提示"
    Else
        Call a_load
    End If
    DoCmd.SetWarnings True
End Sub

求指点！

Top

麥田发表于：2014-03-21 15:57:42

看一下你的表中这些字段里面有没有数据为空就会提示null

Top

在水一方发表于：2014-03-22 13:26:46

一般使用dcount()=0 判断没有记录

Top

久石让的粉丝发表于：2014-03-23 22:32:02

Private Sub LP_05_Click()
DoCmd.SetWarnings False
A = "LP-05"

使用Nz函数,以上代码可以改写如下，Nz函数具体用法可以在论坛中找到

B = Nz(DLookup("准备单号", "dbo_MAX最新准备单", "设备号 = '" & A & "' "),"0")

If B=0 Then

        MsgBox "此设备未装模，请联系现场管理！", vbOKOnly, "系统提示"
    Else
        Call a_load
    End If
    DoCmd.SetWarnings True
End Sub

Top

总记录：3篇页次：1/1 9 1 :

Access交流中心

无效调用NULL值