Dialog Box acces 2003

[Denver]

I have the following codes
I want to change the font size of those messages, is this possible?
please can you help how to do it, iam using access 2003

thanks

I really appreciate for any help

Denver

Dim response As String
Dim Mynote As String

'Prompt SLSA Engineering MessageBox
Mynote = "Close MainSwitchBoard?"

'Display Message Box
response = MsgBox(Mynote, vbYesNo + vbQuestion, "SLSA Engineering
Database")

If response = vbNo Then
'Remain Database open.
DoCmd.CancelEvent

Else
'Engineering Database prompt MessageBox confirmation.
response = MsgBox("SLSA Engineering Database will be asking your
password after " & _
"closing the MainSwitchBoard if you try to open
again." & _
vbCrLf & "You can not view any menu in the Database
" & _
"if you click OK", vbOKCancel + vbExclamation,
"Engineering Database")

If response = vbCancel Then
'Remain Database Open.
DoCmd.CancelEvent

Else
'Close SwitchBoard
DoCmd.Close
End If
End If

 

[Jean-Guy Marcil]

I have the following codes
I want to change the font size of those messages, is this possible?
please can you help how to do it, iam using access 2003

This is a Word VBA group, not an Access one...

In any case, I am no Access expert, but I do believe that if you use the
MsgBox function there si nothing you can do regarding the display attributes.

It would be easier if you created your own userform from within Access and
then call it (through a function) when needed and passing the text you want
as a string parameter in the function.

 

[Denver]

thanks anyway for your time..

This is a Word VBA group, not an Access one...

In any case, I am no Access expert, but I do believe that if you use the
MsgBox function there si nothing you can do regarding the display attributes.

It would be easier if you created your own userform from within Access and
then call it (through a function) when needed and passing the text you want
as a string parameter in the function.