Create Message-Box with VBA and Visio

Hi everyone,

I have tried to find a Keyword to create a Message-window or something like that in Visio, but I did′t find anything.

I just need to create a small window with a Message on it.

Please tell me how to do :)

Thanks

[256 byte] By [lustigorMolch] at [2007-12-24]
# 1
VBA code for messagebox:
Dim Msg, Style, Title, Help, Ctxt, Response, MyString

Msg = "Do you want to continue ?" ' Define message.

Style = vbYesNo + vbCritical + vbDefaultButton2 ' Define buttons.

Title = "MsgBox Demonstration" ' Define title.

Help = "DEMO.HLP" ' Define Help file.

Ctxt = 1000 ' Define topic

' context.

' Display message.

Response = MsgBox(Msg, Style, Title, Help, Ctxt)

If Response = vbYes Then ' User chose Yes.

MyString = "Yes" ' Perform some action.

Else ' User chose No.

MyString = "No" ' Perform some action.

End If

DMan1 at 2007-8-31 > top of Msdn Tech,Visual Basic,Visual Basic IDE...
# 2
Thanks
lustigorMolch at 2007-8-31 > top of Msdn Tech,Visual Basic,Visual Basic IDE...