V Access desktopové databázi 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 je to součet hodnot určující počet a typ zobrazených tlačítek, styl ikony, který se má použít, identitu 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í
TlačítkaArgument nastavení jsou:
|
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 Visual Basic for Applications. 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 |
Zrušit |
|
vbAbort |
3 |
Přerušení |
|
vbRetry |
4 |
Opakovat |
|
vbIgnore |
5 |
Ignore (Přeskočit) |
|
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, je nutné použít MsgBox v Výraz. 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 soubor nápovědy, který obsahuje téma s číslem kontextu nápovědy, které se rovná 1000.
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
