Condition Not Satisfying With Text Data

[Ashfaque]

Below are all text fields on form. I m trying to check if all are empty then msg and drop the execution at a click of a btn.

Dim MyCheck As String
If (IsNull(Me.FirstTime) Or IsNull(Me.SecondTime)) And (IsNull(Me.ThirdTime) Or IsNull(Me.FourthTime)) Then
MsgBox ("Please Enter Action"), vbCritical
....
....

But doesn't works. I need to check if all above fields are empty or not. If anyone of them have value, then further process.

Any help?

Thanks,

 

[bob fitz]

Below are all text fields on form. I m trying to check if all are empty then msg and drop the execution at a click of a btn.

Dim MyCheck As String
If (IsNull(Me.FirstTime) Or IsNull(Me.SecondTime)) And (IsNull(Me.ThirdTime) Or IsNull(Me.FourthTime)) Then
MsgBox ("Please Enter Action"), vbCritical
....
....

But doesn't works. I need to check if all above fields are empty or not. If anyone of them have value, then further process.

Any help?

Thanks,

Perhaps:
If (IsNull(Me.FirstTime) Or IsNull(Me.SecondTime)) OR (IsNull(Me.ThirdTime) Or IsNull(Me.FourthTime)) Then
MsgBox ("Please Enter Action"), vbCritical

 

[Ashfaque]

Thanks Bob,

But your code still displays the msg even there is value in one of the above fields.

Any other idea..?

 

[bob fitz]

Thanks Bob,

But your code still displays the msg even there is value in one of the above fields.

Any other idea..?

Perhaps you need to replace all the "OR"s with "AND"s

 

[Ashfaque]

Perhaps you need to replace all the "OR"s with "AND"s

DONE.....thanks Bob.....

 

[moke123]

Is it possible you have zero length strings?
you can check for both null and zls with Nz(yourField,"") <> ""

 

[bob fitz]

DONE.....thanks Bob.....

You're welcome. Always glad to help if I can.
BTW moke 123 offers some worthwhile advice in post #6