MsgBox Statement

Vidigas dialogujon kiu enhavas mesaĝon.

Sintakso:

MsgBox Teksto kiel ĉeno [,Tipo kiel entjero [,Dialogtitolo kiel ĉeno]] (kiel komando) aŭ MsgBox (Teksto kiel ĉeno [,Tipo kiel entjero [,Dialogtitolo kiel ĉeno]]) (kiel funkcio)

Parametro:

Teksto: ĉena esprimo vidigota kiel mesaĝo en la dialogujo. Linisaltojn enmetu kiel Chr$(13).

DialogTitolo: ĉena esprimo vidigota en la titola breto de la dialogo. Se ellasita, la titola breto vidigos la nomon de la respektiva aplikaĵo.

Tipo: entjera esprimo kiu difinas la dialogan tipon, aldone al la numero kaj tipo de butonoj vidigotaj, kaj la tipon de bildsimbolo. Tipo reprezentas kombinaĵon de bitaj ŝablonoj, alivorte, eblas difini kombinaĵon de elementoj aldonante ilian respektivajn valorojn:

Named constant

Integer value

Definition

MB_OK

0

Display OK button only.

MB_OKCANCEL

1

Display OK and Cancel buttons.

MB_ABORTRETRYCANCEL

2

Display Abort, Retry, and Ignore buttons.

MB_YESNOCANCEL

3

Display Yes, No, and Cancel buttons.

MB_YESNO

4

Display Yes and No buttons.

MB_RETRYCANCEL

5

Display Retry and Cancel buttons.

MB_ICONSTOP

16

Add the Stop icon to the dialog.

MB_ICONQUESTION

32

Add the Question icon to the dialog.

MB_ICONEXCLAMATION

48

Add the Exclamation Point icon to the dialog.

MB_ICONINFORMATION

64

Add the Information icon to the dialog.

128

First button in the dialog as default button.

MB_DEFBUTTON2

256

Second button in the dialog as default button.

MB_DEFBUTTON3

512

Third button in the dialog as default button.


Error codes:

5 Nevalida procedurvoko

Ekzemplo:

Sub ExampleMsgBox

 Const sText1 = "Neatendita eraro okazis."

 Const sText2 = "Tamen la programo daŭre ruliĝos."

 Const sText3 = "Eraro"

 MsgBox(sText1 + Chr(13) + sText2,16,sText3)

 MsgBox(sText1 + Chr(13) + sText2, MB_ICONSTOP, sText3)

End Sub