Mesbox Format

  • Thread starter Thread starter Guest
  • Start date Start date
Is there any way to change the format (Font, color, bold etc) of text in a
mesgbox?
Click to expand...

Only if you change the master settings for the message box for all
Windows and Office Application.
Right- lick on a blank section of the Windows Desktop.
Select Properties +Appearance + Advanced.
Find the Message Box in the drop down.

I would suggest that rather than change the settings for all
applications, you create your own, unbound form to be used as a
message form.

Add a Label control and a Text control as well as 2 command buttons to
the form.
You can set the font style, size, color, etc. however you wish.

Name the command buttons cmdYes and cmdNo.
Code the cmdYes button's click event:
TextControlName = 1
Me.Visible = False

Code the cmdNo click event:
TextControlName = 2
Me.Visible = False

You would then open the form, using:

Dim strMessage as String
strMessage = "This is your message to display on the form"
DoCmd.OpenForm "MessageFormName", , , , , acDialog, strMessage

If forms!MessageFormName!TextControlName = 1 then
' Do the Yes thing
Else
'Do the No thing
End If

DoCmd.Close acForm,"MessageFormName"

Code the Load event of the message box form:
LabelName.Caption = Me.OpenArgs

When the form is opened, processing waits (just like a MsgBox) until
you click either command button. Then the Yes or No action will be
taken and the form closed.
 
Back
Top