Tartalom

# MsgBox Function

Megjelenít egy üzenetet tartalmazó párbeszédablakot, és visszaad egy értéket.

### Szintaxis:

    MsgBox (Prompt As String [,Buttons = MB_OK [,Title As String]]) As Integer

### Paraméterek:

prompt: String expression displayed as a message in the dialog box. Line breaks can be inserted with Chr$(13).

title: String expression displayed in the title bar of the dialog. If omitted, the title bar displays the name of the respective application.

buttons: Any integer expression that specifies the dialog type, as well as the number and type of buttons to display, and the icon type. buttons represents a combination of bit patterns, that is, a combination of elements can be defined by adding their respective values:

Nevesített konstans | Egész érték | Definíció
--- | --- | ---
MB_OK | 0 | Csak az OK gombot jeleníti meg.
MB_OKCANCEL | 1 | Az OK és a Mégse gombot jeleníti meg.
MB_ABORTRETRYIGNORE | 2 | A Megszakítás, az Újra és a Mellőzés gombot jeleníti meg.
MB_YESNOCANCEL | 3 | Az Igen, a Nem és a Mégse gombot jeleníti meg.
MB_YESNO | 4 | Az Igen és a Nem gombot jeleníti meg.
MB_RETRYCANCEL | 5 | Az Újra és a Mégse gombot jeleníti meg.
MB_ICONSTOP | 16 | A Stop ikon hozzáadása a párbeszédablakhoz.
MB_ICONQUESTION | 32 | A Kérdőjel ikon hozzáadása a párbeszédablakhoz.
MB_ICONEXCLAMATION | 48 | A Felkiáltójel ikon hozzáadása a párbeszédablakhoz.
MB_ICONINFORMATION | 64 | Az Információ ikon hozzáadása a párbeszédablakhoz.
| 128 | A párbeszédablak első gombja az alapértelmezett gomb.
MB_DEFBUTTON2 | 256 | A párbeszédablak második gombja az alapértelmezett gomb.
MB_DEFBUTTON3 | 512 | A párbeszédablak harmadik gombja az alapértelmezett gomb.

### Visszatérési érték:

Integer (egész szám)

Nevesített konstans | Egész érték | Definíció
--- | --- | ---
IDOK | 1 | OK
IDCANCEL | 2 | Mégse
IDABORT | 3 | Megszakítás
IDRETRY | 4 | Újra
IDIGNORE | 5 | Mellőzés
IDYES | 6 | Igen
IDNO | 7 | Nem

### Hibakódok:

5 Érvénytelen eljáráshívás

## Példa:

    Sub ExampleMsgBox
    Dim sVar As Integer
     sVar = MsgBox("Las Vegas")
     sVar = MsgBox("Las Vegas",1)
     sVar = MsgBox( "Las Vegas",256 + 16 + 2,"Párbeszédablak címe")
     sVar = MsgBox("Las Vegas", MB_DEFBUTTON2 + MB_ICONSTOP + MB_ABORTRETRYIGNORE, "Dialog title")
    End Sub