MsgBox Statement

Visar en dialogruta som innehÄller ett meddelande.

Syntax:

MsgBox Text As String [,Type As Integer [,Dialogtitle As String]] (As Statement) eller MsgBox (Text As String [,Type As Integer [,Dialogtitle As String]]) (As Function)

Parameter:

Text: StrÀnguttryck visat som ett meddelande i dialogrutan. Radbrytningar kan infogas med Chr$(13).

DialogTitle: StrÀnguttryck visat i dialogrutans titellist. Om det utelÀmnas visas namnen pÄ respektive program pÄ titellisten.

Typ: Ett heltalsuttryck som anger dialogrutetypen liksom hur mÄnga och vilken typ av knappar som ska visas, samt ikontypen. Typ representerar en kombination av bitmönster, dvs. en kombination av element kan definieras genom att respektive vÀrde lÀggs till:

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 Felaktigt proceduranrop

Exempel:

Sub ExampleMsgBox

 Const sText1 = "Ett ovÀntat fel intrÀffade."

 Const sText2 = "Programmet kommer dock att fortsÀtta köras."

 Const sText3 = "Fel"

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

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

End Sub