V desktopové databázi Accessu zobrazí funkce MsgBox v dialogovém okně zprávu, 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 ] [ ,title ] [, helpfile ] [, kontext] )
Syntaxe funkce MsgBox obsahuje 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ě 1 024 znaků v závislosti na šířce použitých znaků. Pokud se výzva skládá z více řádků, můžete řádky oddělit znakem návratu na řádek (Chr(13)), znakem funkcelinefeed ( Chr(10)) nebo návrat na řádek – kombinace znaků funkce Chr(13) &Chr(10)) mezi jednotlivými řádky. |
tlačítka |
Nepovinný argument. Číselný výraz to je součet hodnot určujících počet a typ tlačítek, která se zobrazí, styl ikony, který se má použít, identita výchozího tlačítka a modality okna se zprávou. Pokud je tento parametr vynechán, je výchozí hodnota tlačítek 0. |
Název |
Nepovinný argument. Řetězcový výraz zobrazený v záhlaví dialogového okna. Pokud název vysídíte,název aplikace se umístí do záhlaví. |
helpfile |
Nepovinný argument. Řetězcový výraz identifikující soubor nápovědy k poskytnutí kontextové nápovědy pro dialogové okno. Pokud je nápověda k dispozici, musí se poskytnuta také kontext. |
kontext |
Nepovinný argument. Číselný výraz, který je číslem kontextové nápovědy přiřazeným příslušnému tématu nápovědy autorem. Pokud je kontext k dispozici, musí být také k dispozici helpfile. |
Nastavení
K dispozici jsouArgument nastavení:
Konstanta |
Hodnota |
Popis |
vbOKOnly |
0 |
Zobrazí jenom tlačítko OK. |
vbOKCancel |
1 |
Zobrazení tlačítek OKa Zrušit |
vbAbortRetryIgnore |
2 |
Tlačítka Přerušovatzobrazení, Opakovat a Ignorovat |
vbYesNoCancel |
3 |
Zobrazení tlačítek Ano,Nea Zrušit |
vbYesNo |
4 |
Zobrazení tlačítek Ano a Ne. |
vbRetryCancel |
5 |
Zobrazení tlačítek Opakovata Zrušit |
vbKritická |
16 |
Zobrazit ikonu kritické zprávy |
vbQuestion |
32 |
Zobrazit ikonu dotazu upozornění |
vbExclamation |
48 |
Zobrazit ikonu upozornění |
vbSi |
64 |
Ikona Zobrazit informační zprávu |
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 |
Modální aplikace; Uživatel musí odpovědět na pole se zprávou a až potom pokračovat v práci v aktuální aplikaci. |
vbSystemModal |
4096 |
Modální systém; Všechny aplikace jsou pozastavené, dokud uživatel neodpoví na okno se zprávou. |
vbMsgBoxHelpButton |
16384 |
Adds Help button to the message box |
VbMsgBoxSetForeground |
65536 |
Určuje okno okna okna zprávy jako okno popředí. |
vbMsgBoxRight |
524288 |
Text je zarovnaný doprava. |
vbMsgBoxRtlReading |
1048576 |
Určuje text, který se má v hebrejských a arabských systémech zobrazovat jako čtení zprava doleva. |
Tip: V Accessu 2010 obsahuje Tvůrce výrazů technologii IntelliSense, takže vidíte, jaké argumenty výraz vyžaduje.
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 ikony. třetí skupina (0, 256, 512) určuje, které tlačítko je výchozí. a čtvrtá skupina (0, 4096) určuje modálnost okna se zprávou. Při součtení čísel pro vytvoření konečné hodnoty argumentu tlačítek použijte z každé skupiny pouze jedno číslo.
Poznámka: Tyto konstanty jsou určené jazykem Visual Basic for Applications. V důsledku toho je možné názvy použít kdekoli v kódu místo skutečných hodnot.
Vrácené hodnoty
Konstanta |
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
Pokud je k dispozici nápověda i kontext, může uživatel stisknutím kláves F1 (Windows) nebo HELP (Macintosh) zobrazit téma nápovědy odpovídající příslušnému kontextu. Některé hostitelské aplikace, třeba 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, má stisknutí klávesy ESC stejný efekt jako kliknutí na Zrušit. Pokud dialogové okno obsahuje tlačítko Nápověda, zobrazí se kontextová nápověda. Žádná hodnota se ale vrátí, dokud neklikáte na jedno z dalších tlačítek.
Poznámka: Pokud chcete zadat víc než první pojmenovaný argument, musíte okno MsgBox v textovém poli Výraz. Pokud chcete některé argumenty pozice vynechat, je nutné zahrnovat odpovídající oddělovač.
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 OknoSeZobrazení kritické chyby v dialogovém okně s tlačítky Ano a Ne. Jako výchozí odpověď je zadané tlačítko Ne. Hodnota vrácená funkcí MsgBox závisí na tlačítku zvoleném uživatelem. Tento příklad předpokládá, DEMO.HLP je soubor nápovědy, který obsahuje téma s kontextovou číslem nápovědy, které se 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