Msgbox Title

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Where does msgbox title fit?

If (Eval("[Forms]![attendance]![Qualification ID] Is Null")) Then
If (MsgBox "message." & vbCrLf & "more message?", 4) = 6) Then
DoCmd....

or do I have this all wrong?
 
Tom,

I don't understand why you're using Eval(). Try changing the whole thing as
follows:
If IsNull(Forms!attendance![Qualification ID]) Then
If vbYes = MsgBox("message" & vbCrLf & "more
message?",vbYesNo+vbQuestion,"title") Then
'User answered YES
Else
'User answered NO
End If
Else
'Qualification ID isn't Null
End If

Regards,
Graham R Seach
Microsoft Access MVP
Sydney, Australia
 
Thank you. Works fine.
Why I used Eval()? ...... with my limited resources, I learned most of this
by covertning macros to modules and studing the result. Now I know this one
better!
Thanks again.

Graham R Seach said:
Tom,

I don't understand why you're using Eval(). Try changing the whole thing as
follows:
If IsNull(Forms!attendance![Qualification ID]) Then
If vbYes = MsgBox("message" & vbCrLf & "more
message?",vbYesNo+vbQuestion,"title") Then
'User answered YES
Else
'User answered NO
End If
Else
'Qualification ID isn't Null
End If

Regards,
Graham R Seach
Microsoft Access MVP
Sydney, Australia
---------------------------

Tom said:
Where does msgbox title fit?

If (Eval("[Forms]![attendance]![Qualification ID] Is Null")) Then
If (MsgBox "message." & vbCrLf & "more message?", 4) = 6)
Then
DoCmd....

or do I have this all wrong?
Click to expand...
Click to expand...
 
Tom,

Since you are not using it, it's irrelevant, but the
difference is that, IIRC, the MsgBox in Expression Service
(via Eval, SQL or ControlSource) uses @ as a section
separator (ala <= A97) while the VBA MsgBox does not.
--
Marsh
MVP [MS Access]

Thank you. Works fine.
Why I used Eval()? ...... with my limited resources, I learned most of this
by covertning macros to modules and studing the result. Now I know this one
better!
Thanks again.

Graham R Seach said:
Tom,

I don't understand why you're using Eval(). Try changing the whole thing as
follows:
If IsNull(Forms!attendance![Qualification ID]) Then
If vbYes = MsgBox("message" & vbCrLf & "more
message?",vbYesNo+vbQuestion,"title") Then
'User answered YES
Else
'User answered NO
End If
Else
'Qualification ID isn't Null
End If

Regards,
Graham R Seach
Microsoft Access MVP
Sydney, Australia
---------------------------

Tom said:
Where does msgbox title fit?

If (Eval("[Forms]![attendance]![Qualification ID] Is Null")) Then
If (MsgBox "message." & vbCrLf & "more message?", 4) = 6)
Then
DoCmd....

or do I have this all wrong?
Click to expand...
Click to expand...
Click to expand...
 
Back
Top