Change The Message Box Default Icon

[gshabtay]

I just wonder how can I Change The Message Box
Default Icon ?

Constant	Value	Description

vbOKOnly	0	OK button only (default).
vbOKCancel	1	OK and Cancel buttons.
vbAbortRetryIgnore	2	Abort, Retry, and Ignore buttons.
vbYesNoCancel	3	Yes, No, and Cancel buttons.
vbYesNo	4	Yes and No buttons.
vbRetryCancel	5	Retry and Cancel buttons.
vbCritical	16	Critical message.
vbQuestion	32	Warning query.
vbExclamation	48	Warning message.
vbInformation	64	Information message.
vbDefaultButton1	0	First button is default (default).
vbDefaultButton2	256	Second button is default.

vbDefaultButton3	512	Third button is default.
vbApplicationModal	0	Application modal message box (default).
vbSystemModal	4096	System modal message box.

MsgBox Return Values

Constant	Value	Description

vbOK	1	OK button pressed.
vbCancel	2	Cancel button pressed.
vbAbort	3	Abort button pressed.
vbRetry	4	Retry button pressed.
vbIgnore	5	Ignore button pressed.
vbYes	6	Yes button pressed.
vbNo	7	No button pressed.


use:

Msgbox "Hi!", 64, "Hello!!!"
Msgbox "What?", 32
Msgbox "System Message!, 48
Msgbox "DANGER!", 16

You can add to:
Msgbox "Hi", 4 + 1

Or look in your help file under Msgbox Constants. Those are the icons and options you can do with a messagebox. There is no way you can use the default messagebox and use your own icon, to do that, you must create your own with a form.

[Edited by Matthew Gates on 07-11-2000 at 02:50 PM]

It might be easier just to use the constants.

retval = MsgBox("Critical Icon with ABORT, RETRY, IGNORE", vbAbortRetryIgnore + vbCritical, "MyTile")