Module
Contents
Index 🔎︎

# MsgBox Function

En dialogruta som innehåller ett meddelande visas och ett värde returneras.

## Syntax:

    MsgBox (Text As String [,Typ As Integer [,Dialogtitel As String]])

## Returvärde:

Integer

## 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 namnet på respektive program.

Typ: Ett heltalsuttryck som anger dialogrutetypen och definierar hur många och vilken typ av knappar och ikoner som ska visas. Typ representerar en kombination av bitmönster (dialogruteelement som definierats genom att respektive värde lagts till):

Värden

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.

Returvärde:

Named constant | Integer value | Definition
IDOK | 1 | OK
IDCANCEL | 2 | Cancel
IDABORT | 3 | Abort
IDRETRY | 4 | Retry
IDIGNORE | 5 | Ignore
IDYES | 6 | Yes
IDNO | 7 | No

## Error codes:

5 Felaktigt proceduranrop

## Exempel:

    Sub ExampleMsgBox

    Dim sVar As Integer

     sVar = MsgBox("Las Vegas")

     sVar = MsgBox("Las Vegas",1)

     sVar = MsgBox( "Las Vegas",256 + 16 + 2,"Dialog title")

     sVar = MsgBox("Las Vegas", MB_DEFBUTTON2 + MB_ICONSTOP + MB_ABORTRETRYCANCEL, "Dialog title")

    End Sub