V desktopové databázi Accessu zobrazí MsgBox tato funkce zprávu v dialogovém okně, počká, až uživatel vybere tlačítko, a vrátí hodnotu označující Integer , které tlačítko uživatel vybral.
Syntaxe
MsgBox(prompt[, buttons][, title][, helpfile][, context])
Syntaxe MsgBox funkce obsahuje tyto argumenty:
| Argument | Popis |
|---|---|
prompt |
Povinný argument. Řetězcový výraz zobrazený jako zpráva v dialogovém okně. Maximální délka prompt je asi 1024 znaků v závislosti na šířce použitých znaků. Pokud prompt obsahuje více než jeden řádek, můžete řádky oddělit znakem návratu na začátek řádku (Chr(13)), znakem návratu po řádku (Chr(10)) nebo kombinací návratu na začátek řádku (Chr(13) & Chr(10)) mezi jednotlivými řádky. |
buttons |
Nepovinný argument. Číselný výraz představující součet hodnot určujících počet a typ zobrazených tlačítek, styl ikon, který chcete použít, identitu výchozího tlačítka a způsob zobrazení okna se zprávou. Pokud ho 0vynecháte, použije se výchozí hodnota pro buttons . |
title |
Nepovinný argument. Řetězcový výraz zobrazený v záhlaví dialogového okna Pokud ho titlevynecháte, název aplikace se zobrazí v záhlaví. |
helpfile |
Nepovinný argument. Řetězcový výraz určující soubor nápovědy, který se má použít k poskytnutí kontextové nápovědy k dialogovému oknu. Pokud helpfile je k dispozici, musí být také poskytnuta. context |
context |
Nepovinný argument. Číselný výraz představující kontextové číslo nápovědy přiřazené příslušnému tématu nápovědy autorem nápovědy. Pokud context je k dispozici, musí být také poskytnuta. helpfile |
Nastavení
Nastavení argumentů buttons jsou:
| Konstanta | Value (Hodnota) | Popis |
|---|---|---|
vbOKOnly |
0 |
Zobrazit pouze OK . |
vbOKCancel |
1 |
Zobrazení OK a Zrušit. |
vbAbortRetryIgnore |
2 |
Zobrazení přerušení, opakování a ignorování |
vbYesNoCancel |
3 |
Zobrazit Ano, Ne a Zrušit. |
vbYesNo |
4 |
Zobrazení ano a ne |
vbRetryCancel |
5 |
Zobrazení, Opakovat a Zrušit. |
vbCritical |
16 |
Zobrazení ikony kritické zprávy |
vbQuestion |
32 |
Zobrazení ikony dotazu upozornění |
vbExclamation |
48 |
Zobrazení ikony zprávy upozornění |
vbInformation |
64 |
Zobrazení ikony informační zprávy |
vbDefaultButton1 |
0 |
Nastavení prvního tlačítka jako výchozího |
vbDefaultButton2 |
256 |
Nastavte druhé tlačítko jako výchozí. |
vbDefaultButton3 |
512 |
Třetí tlačítko nastavte jako výchozí. |
vbDefaultButton4 |
768 |
Nastavení čtvrtého tlačítka jako výchozího |
vbApplicationModal |
0 |
Modální aplikace. Uživatel musí před pokračováním v práci v aktuální aplikaci odpovědět na okno se zprávou. |
vbSystemModal |
4096 |
Modální systém. Všechny aplikace jsou pozastavené, dokud uživatel neodpoví na okno se zprávou. |
vbMsgBoxHelpButton |
16384 |
Přidejte do okna se zprávou tlačítko Nápověda . |
VbMsgBoxSetForeground |
65536 |
Nastavte okno zprávy jako okno v popředí. |
vbMsgBoxRight |
524288 |
Zarovnání textu doprava |
vbMsgBoxRtlReading |
1048576 |
Zajistěte, aby se text zobrazoval se čtením zprava doleva v hebrejštině a arabštině. |
První skupina hodnot (0 až 5) popisuje počet a typ tlačítek zobrazených v dialogovém okně. Druhá skupina (16, 32, 48, ) 64popisuje styl ikony. Třetí skupina (0, 256, 512) určuje, které tlačítko bude výchozí. Čtvrtá skupina (0, 4096) určuje modalitu okna zprávy. Při vytváření konečné hodnoty argumentu buttons sčítáním čísel použijte pouze jedno číslo z každé skupiny.
Poznámka
Tyto konstanty určuje jazyk jazyk Visual Basic for Application. V důsledku toho můžete kdekoli v kódu použít názvy místo skutečných hodnot.
Vrácené hodnoty
| Konstanta | Value (Hodnota) | Popis |
|---|---|---|
vbOK |
1 |
OK |
vbCancel |
2 |
Storno |
vbAbort |
3 |
Přerušit |
vbRetry |
4 |
Opakovat |
vbIgnore |
5 |
Ignorovat |
vbYes |
6 |
Ano |
vbNo |
7 |
Ne |
Poznámky
Pokud jsou k dispozici obě helpfile možnosti context , může uživatel stisknout klávesu F1 ve Windows nebo Nápověda v macOS a zobrazit si téma nápovědy, které odpovídá context. Některé hostitelské aplikace, například Microsoft Excel, také automaticky přidají do dialogového okna tlačítko Nápověda .
Pokud se v dialogovém okně zobrazí tlačítko Zrušit , má stisknutí klávesy Esc stejný účinek jako výběr možnosti Zrušit. Pokud dialogové okno obsahuje tlačítko Nápověda , bude pro toto dialogové okno poskytnuta kontextová nápověda. Žádná hodnota se ale nevrátí, dokud uživatel nevybere jedno z dalších tlačítek.
Poznámka
Pokud chcete zadat více než první pojmenovaný argument, musíte použít MsgBox výraz. Pokud chcete některé poziční argumenty vynechat, musíte použít odpovídající oddělovač čárek.
Příklad
Poznámka
Následující příklad ukazuje použití této funkce v modulu VBA (jazyk Visual Basic for Application).
V tomto příkladu se tato MsgBox funkce používá k zobrazení kritické chybové zprávy v dialogovém okně s tlačítky Ano a Ne . Tlačítko Ne je určené jako výchozí odpověď. Hodnota vrácená MsgBox funkcí závisí na tlačítku, které uživatel vybere. Tento příklad předpokládá, že DEMO.HLP se jedná o soubor nápovědy obsahující téma s číslem kontextu nápovědy rovnajícím 1000se .
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