By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
435,434 Members | 2,994 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 435,434 IT Pros & Developers. It's quick & easy.

Seeking way to control default font size in ONLY MsgBox's in A97?

P: n/a
MLH
Without modifying the default font settings everywhere, is there any
way to specify it for just message boxes?

MsgBox "I would like this text to be larger for all message boxes."

???
Mar 12 '07 #1
Share this Question
Share on Google+
3 Replies


P: n/a
On Mar 12, 4:56 pm, MLH <C...@NorthState.netwrote:
Without modifying the default font settings everywhere, is there any
way to specify it for just message boxes?

MsgBox "I would like this text to be larger for all message boxes."

???
Not that I'm aware of.
Have you considered making you own?
This would give you more control with the least amount of headache.

Mar 12 '07 #2

P: n/a
On Mon, 12 Mar 2007 17:56:38 -0400, MLH wrote:
Without modifying the default font settings everywhere, is there any
way to specify it for just message boxes?

MsgBox "I would like this text to be larger for all message boxes."

???
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.
Change it's Font size there.

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.
Name them cmdYes and cmdNo

You can set the font style, size, color, etc., however you wish.

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"
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.
--
Fred
Please respond only to this newsgroup.
I do not reply to personal e-mail
Mar 13 '07 #3

P: n/a
MLH
Thx for the suggestions. I've implemented form-based message boxes
in the past. They are at least tenfold the work if compared to
MsgBox "Hello"

I wish the Select Properties +Appearance + Advanced.thing worked
in Access. It does not change the font size in MS Access 97 message
boxes on my XP system. Maybe in other places - but not in A97.

Thx.
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
On Mon, 12 Mar 2007 16:53:05 -0800, fredg <fg******@example.invalid>
wrote:
>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.
Change it's Font size there.
Mar 13 '07 #4

This discussion thread is closed

Replies have been disabled for this discussion.