Мне нужно искать несколько ответов для одной переменной

Question

Приведенный ниже код пытается открыть всплывающее окно в зависимости от того, какой «результат» равен.Отчет, в котором находится эта командная кнопка, содержит несколько строк для «PassFail».Моя цель - искать в каждой строке и иметь разные всплывающие окна для разных результатов.Например, если какой-либо «PassFail» равен «fail» или является пустым, появляется первое всплывающее сообщение.Если все «PassFail» равно «Pass», второе всплывающее сообщение.Пожалуйста, помогите !!!

Dim result As Variant
result = DLookup("PassFail", "dbo_TestDetail", "dbo_TestDetail.TDIndex" = " & Me!Index & ")

Dim Msg, Style, Title

If result = "Fail" Or Null Then

    Msg = "The test data for S/N " & Me!SN & " has nonconforming values. The TDS will not be approved."
    Style = vbCritical + vbDefaultButton2
    Title = "TDS Approval Denied"

ElseIf result = "Pass" Then
    Msg = "Are you sure you want to approve the test data for S/N " & Me!SN & "?"
    Style = vbYesNo + vbCritical + vbDefaultButton2
    Title = "TDS Approval"

End If

Answer 1

Ничего не может сравнить с Null и, конечно, просто не может Or Null.

If result = "Fail" Or IsNull(result) Then