MsgBox: Difference between revisions
Jump to navigation
Jump to search
No edit summary |
No edit summary |
||
| Line 38: | Line 38: | ||
If Continue = vbYes Then | If Continue = vbYes Then | ||
Continue=MsgBox("Short tour, huh?") | Continue=MsgBox("Short tour, huh?") | ||
End If | |||
Continue = MSGBOX("Repeat tour?", 1) | Continue = MSGBOX("Repeat tour?", 1) | ||
If Continue = vbCancel Then | |||
MSGBOX("Goodbye!") | MSGBOX("Goodbye!") | ||
End If | End If | ||
| Line 47: | Line 47: | ||
== Output == | == Output == | ||
[[ | [[file:MSGBOX.jpg]] | ||
== Related Items == | == Related Items == | ||
Revision as of 01:22, 24 August 2012
MsgBox(prompt[, okCancel])
Description
MsgBox opens a dialog box, and waits for the user to tap on a button. The return value is an integer that indicates which button was tapped. The required parameter, prompt, is a string expression that is displayed in the body of the dialog box. The optional parameter, okCancel, is a numeric or constant expression that specifies whether to ask the user to choose between a Cancel and Ok. The default value for okCancel is 0.
Table 15: okcancel constants
| Constant | Value | Description |
|---|---|---|
| vbOKOnly | 0 | OK Button only |
| vbOKCancel | 1 | OK and Cancel Buttons |
Table 16: MSGBOX return values
| Constant | Value | Description |
|---|---|---|
| vbOK | 1 | OK |
| vbCancel | 2 | Cancel |
Example
Rem MsgBox Example
'MsgBox displays a modal dialog box
Dim Continue
MsgBox("Hello World!")
MsgBox "Brief tour of MSGBOX", vbOK
Continue = MsgBox("Continue tour?", 1)
If Continue = vbYes Then
Continue=MsgBox("Short tour, huh?")
End If
Continue = MSGBOX("Repeat tour?", 1)
If Continue = vbCancel Then
MSGBOX("Goodbye!")
End If
