D
Debbiedo
How can I change this code to test for empty values as well as null
values for Case 2?
' ... build "Approval" criterion expression
Select Case Me.frameApproval.Value
Case 1 ' Approved
strWhere = strWhere & "SPNDSBUS='X' And "
Case 2 ' Not Approved
strWhere = strWhere & "IsNull(SPNDSBUS) And "
Case Else ' Either
' no code needed
End Select
Many thanks
Deb
values for Case 2?
' ... build "Approval" criterion expression
Select Case Me.frameApproval.Value
Case 1 ' Approved
strWhere = strWhere & "SPNDSBUS='X' And "
Case 2 ' Not Approved
strWhere = strWhere & "IsNull(SPNDSBUS) And "
Case Else ' Either
' no code needed
End Select
Many thanks
Deb