V desktopové databázi Accessu funkce MsgBox zobrazí zprávu v dialogovém okně, počká, až uživatel klikne na tlačítko, a vrátí celé číslo označující, na které tlačítko uživatel klikl.
Syntaxe
MsgBox(výzva [, tlačítka ] [, název ] [, soubor nápovědy ] [, kontext ] )
Syntaxe funkce MsgBox má tyto argumenty:
| Argument | Popis |
|---|---|
| Výzva | Povinný argument. Řetězcový výraz zobrazený jako zpráva v dialogovém okně. Maximální délka výzvy je přibližně 1024 znaků v závislosti na šířce použitých znaků. Pokud se výzva skládá z více než jednoho řádku, můžete řádky oddělit pomocí znaku návratu na začátek řádku (Chr(13)), znaku kanálu řádku (Chr(10)) nebo návratu na začátek řádku – kombinace znaků řádku (Chr(13) & Chr(10)) mezi jednotlivými řádky. |
| tlačítka | Nepovinný argument. číselný výraz, což je součet hodnot určující počet a typ tlačítek, která se mají zobrazit, styl ikony, který se má použít, identita výchozího tlačítka a způsob zobrazení okna se zprávou. Pokud je vynechán, výchozí hodnota tlačítek je 0. |
| Název | Nepovinný argument. Řetězcový výraz zobrazený v záhlaví dialogového okna Pokud název vynecháte, název aplikace se umístí do záhlaví. |
| Helpfile | Nepovinný argument. Řetězcový výraz, který identifikuje soubor nápovědy, který se má použít k poskytnutí kontextové nápovědy pro dialogové okno. Pokud je k dispozici soubor nápovědy , je nutné zadat také kontext . |
| Kontextu | Nepovinný argument. Číselný výraz, který je číslem kontextu nápovědy, které autor nápovědy přiřadil příslušnému tématu nápovědy. Pokud je zadaný kontext , musí být k dispozici také soubor nápovědy . |
Nastavení
Nastavení argumentu tlačítek:
| Konstanta | Value (Hodnota) | Popis |
|---|---|---|
| vbOKOnly | 0 | Zobrazit pouze tlačítko OK |
| vbOKCancel | 1 | Zobrazte tlačítka OK a Zrušit . |
| vbAbortRetryIgnore | 2 | Zobrazte tlačítka Přerušit, Opakovat a Ignorovat. |
| vbYesNoCancel | 3 | Zobrazí se tlačítka Ano, Ne a Zrušit . |
| vbYesNo | 4 | Zobrazte tlačítka Ano a Ne . |
| vbRetryCancel | 5 | Zobrazte tlačítka Opakovat a Zrušit . |
| vbKritické | 16 | Zobrazit ikonu Kritická zpráva |
| vbQuestion | 32 | Zobrazit upozornění Ikona dotazu |
| vbExclamation | 48 | Zobrazit ikonu Zpráva s upozorněním . |
| vbInformation | 64 | Zobrazit informace Ikona zprávy . |
| vbDefaultButton1 | 0 | První tlačítko je výchozí. |
| vbDefaultButton2 | 256 | Druhé tlačítko je výchozí. |
| vbDefaultButton3 | 512 | Třetí tlačítko je výchozí. |
| vbDefaultButton4 | 768 | Čtvrté tlačítko je výchozí. |
| vbApplicationModal | 0 | Aplikační modální; uživatel musí odpovědět na okno se zprávou, než bude pokračovat v práci v aktuální aplikaci. |
| vbSystemModal | 4 096 | Modální systém; všechny aplikace jsou pozastaveny, dokud uživatel neodpovědí na okno se zprávou. |
| vbMsgBoxHelpButton | 16384 | Přidá tlačítko Nápověda do okna se zprávou. |
| VbMsgBoxSetForeground | 65536 | Určuje okno se zprávou jako okno popředí. |
| vbMsgBoxRight | 524288 | Text je zarovnaný doprava. |
| vbMsgBoxRtlReading | 1048576 | Určuje, že text by se měl zobrazovat jako čtení zprava doleva v hebrejských a arabských systémech. |
První skupina hodnot (0–5) popisuje počet a typ tlačítek zobrazených v dialogovém okně; Druhá skupina (16, 32, 48, 64) popisuje styl ikon; Třetí skupina (0, 256, 512) určuje, které tlačítko je výchozí; a čtvrtá skupina (0, 4096) určuje způsob pole zprávy. Při sčítání čísel pro vytvoření konečné hodnoty pro argument tlačítek použijte pouze jedno číslo z každé skupiny.
Poznámka
Tyto konstanty jsou určeny jazykem jazyk Visual Basic for Application. V důsledku toho se názvy dají použít kdekoli v kódu místo skutečných hodnot.
Návratové hodnoty
| Konstanta | Value (Hodnota) | Popis |
|---|---|---|
| vbOK | 1 | OK |
| vbCancel | 2 | Storno |
| vbAbort | 3 | Přerušení |
| vbRetry | 4 | Opakovat |
| vbIgnore | 5 | Ignorovat |
| vbYes | 6 | Ano |
| vbNo | 7 | Ne |
Poznámky
Po zadání souboru nápovědy i kontextu může uživatel stisknutím klávesy F1 (Windows) nebo HELP (macOS) zobrazit téma nápovědy odpovídající kontextu. Některé hostitelské aplikace, například Microsoft Excel, také automaticky přidávají do dialogového okna tlačítko Nápověda .
Pokud se v dialogovém okně zobrazí tlačítko Zrušit , bude mít stisknutí klávesy ESC stejný účinek jako kliknutí na Tlačítko Storno. Pokud dialogové okno obsahuje tlačítko Nápověda , je pro toto dialogové okno k dispozici kontextová nápověda. Dokud ale neklepete na jedno z dalších tlačítek, nevrátí se žádná hodnota.
Poznámka
Chcete-li zadat více než první pojmenovaný argument, musíte použít MsgBox ve výrazu. Chcete-li vynechat některé poziční argumenty, musíte zahrnout odpovídající oddělovač čárky.
Příklad
Poznámka
Následující příklady ukazují použití této funkce v modulu VBA (Visual Basic pro Applications).
Tento příklad používá funkci MsgBox k zobrazení kritické chybové zprávy v dialogovém okně s tlačítky Ano a Ne. Jako výchozí odpověď je zadáno tlačítko Ne. Hodnota vrácená funkcí MsgBox závisí na tlačítku zvoleném uživatelem. V tomto příkladu se předpokládá, že DEMO.HLP je to soubor nápovědy, který obsahuje téma s číslem kontextu nápovědy, které se 1000rovná .
Dim Msg, Style, Title, Help, Ctxt, Response, MyString
Msg = "Do you want to continue?"
Style = vbYesNo + vbCritical + vbDefaultButton2
Title = "MsgBox Demonstration"
Help = "DEMO.HLP"
Ctxt = 1000
Response = MsgBox(Msg, Style, Title, Help, Ctxt)
If Response = vbYes Then ' User chose Yes.
MyString = "Yes" ' Perform some action.
Else ' User chose No.
MyString = "No" ' Perform some action.
End If