ms-access - 在VBA中，如何与不同变量不同地处理相同错误？

在After_Update中，对于具有两个变量的组合框，我在Access中有一个VBA函数。第一个来自组合框，第二个是基于第一个的查询结果。我创建了一些错误处理来处理Null值，但是我想根据哪个值是Null来不同地处理错误。有时用户会在组合框中输入一个名称，然后将其删除，这将使变量为Null。如果childID为Null，这不是问题，我希望该函数直接退出。如果visitID为Null，我希望它显示错误消息框。我想出的结果显示了两个变量的Null值错误。

On Error GoTo Error_Handle

childID = Me.cmbChildSearchFirst.Column(0)
visitid = DLookup("Visit.[VisitID]", "Q_VisitID_from_ChildID", "[ChildID] =" & childID)

Error_Handle:
If Err.Number = 94 Then
    MsgBox ("Child is not associated with any visit")
    Exit Sub
End If

最佳答案

基本概述:

childID = Me.cmbChildSearchFirst.Column(0)

'proceed only if not null.
If Not IsNull(childID) Then
    If Not IsNull(DLookup("Visit.[VisitID]", "Q_VisitID_from_ChildID", "[ChildID] =" & childID)) Then
        ....
    Else
        MsgBox ("Child is not associated with any visit")
        Exit Sub
    End If
End If

关于ms-access - 在VBA中，如何与不同变量不同地处理相同错误？，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/47685869/