В Access настолна база данни функцията MsgBox показва съобщение в диалогов прозорец, изчаква потребителят да щракне върху бутон и връща цяло число , показващо кой бутон е щракнал потребителят.
Синтаксис
MsgBox ( подкана [, бутони ] [, заглавие ] [, помощен файл ] [, контекст ] )
Синтаксисът на функцията MsgBox има следните аргументи:
|
Аргумент |
Описание |
|---|---|
|
Бърз |
Задължително. Израз във формата на низ, показан като съобщение в диалоговия прозорец. Максималната дължина на подканата е приблизително 1024 знака в зависимост от ширината на използваните знаци. Ако подканата се състои от повече от един ред, можете да разделите редовете с помощта на знак за нов абзац (Chr(13)), знак с нов ред (Chr(10)) или знак за нов абзац – комбинация от знаци с нов ред (Chr(13) & Chr(10)) между всеки ред. |
|
Бутони |
Незадължително. числов израз, която е сумата от стойности, задаващи броя и типа на бутоните за показване, стила на иконата, който да се използва, самоличността на бутона по подразбиране и модалността на полето за съобщение. Ако липсва, стойността по подразбиране за бутоните е 0. |
|
Заглавие |
Незадължително. Израз във формата на низ, показан в заглавната лента на диалоговия прозорец. Ако изпуснете заглавието, името на приложението се поставя в заглавната лента. |
|
помощен файл |
Незадължително. Израз във формата на низ, който идентифицира помощния файл, който да се използва за предоставяне на контекстно зависими помощна информация за диалоговия прозорец. Ако е предоставен помощен файл , също трябва да се предостави контекст . |
|
Контекста |
Незадължително. Числов израз, който е номерът на контекста на помощта, присвоен на съответната помощна тема от автора на помощта. Ако е предоставен контекст , трябва също да бъде предоставен помощен файл . |
Настройки
Бутоните аргумент настройки са:
|
Константа |
Value |
Описание |
|---|---|---|
|
vbOKOnly |
0 |
Показване само на бутона OK . |
|
vbOKОтказ |
1 |
Показване на бутоните OK и "Отказ" . |
|
vbAbortRetryIgnore |
2 |
Показване на бутоните "Прекратяване", "Повторен опит" и "Игнорирай". |
|
vbYesNoCancel |
3 |
Показване на бутоните "Да", "Не" и "Отказ". |
|
vbYesNo |
4 |
Показване на бутоните "Да " и "Не ". |
|
vbRetryОтказ |
5 |
Показване на бутоните "Опитай пак" и "Отказ". |
|
vbCritical |
16 |
Показване на иконата за критично съобщение . |
|
vbQuestion |
32 |
Показване на иконата на заявка за предупреждение . |
|
vbExclamation |
48 |
Показване на иконата за предупредително съобщение . |
|
vbInformation |
64 |
Икона за показване на информационно съобщение . |
|
vbDefaultButton1 |
0 |
Първият бутон е по подразбиране. |
|
vbDefaultButton2 |
256 |
Вторият бутон е по подразбиране. |
|
vbDefaultButton3 |
512 |
Третият бутон е по подразбиране. |
|
vbDefaultButton4 |
768 |
Четвъртият бутон е по подразбиране. |
|
vbApplicationModal |
0 |
Модален режим на приложение; потребителят трябва да отговори на полето за съобщение, преди да продължи да работи в текущото приложение. |
|
vbSystemModal |
4096 |
Модален режим на системата; всички приложения са временно преустановени, докато потребителят не отговори на полето за съобщение. |
|
Бутон vbMsgBoxHelpButton |
16384 |
Добавя бутона "Помощ" в полето за съобщение |
|
VbMsgBoxSetForeground |
65536 |
Указва прозореца на прозореца на съобщението като прозорец на преден план |
|
vbMsgBoxRight |
524288 |
Текстът е подравнен отдясно |
|
vbMsgBoxRtlReading |
1048576 |
Задава текстът да се показва като четене от дясно наляво на иврит и арабски системи |
Първата група от стойности (0–5) описва броя и типа на бутоните, показани в диалоговия прозорец; втората група (16, 32, 48, 64) описва стила на иконата; третата група (0, 256, 512) определя кой бутон е бутонът по подразбиране; а четвъртата група (0, 4096) определя модалността на полето за съобщение. Когато добавяте числа, за да създадете крайна стойност за аргумента бутони , използвайте само по едно число от всяка група.
Забележка: Тези константи са зададени от Visual Basic for Applications. В резултат на това имената могат да се използват навсякъде в кода вместо действителните стойности.
Върнати стойности
|
Константа |
Value |
Описание |
|---|---|---|
|
vbOK |
1 |
OK |
|
vbОтказ |
2 |
Отказ |
|
vbAbort |
3 |
Прекъсване |
|
vbRetry |
4 |
Повторен опит |
|
vbIgnore |
5 |
Игнорира |
|
vbYes |
6 |
Да |
|
vbNo |
7 |
Не |
Забележки
Когато са предоставени както помощен файл , така и контекст , потребителят може да натиснете F1 (Windows) или HELP (macOS), за да видите помощната тема, съответстваща на контекста. Някои хост приложения, например Microsoft Excel, също автоматично добавят бутон "Помощ " към диалоговия прозорец.
Ако диалоговият прозорец показва бутон Отказ , натискането на клавиша ESC има същия ефект като щракването върху Отказ. Ако диалоговият прозорец съдържа бутон Помощ , за диалоговия прозорец се предоставя контекстно зависителна помощ. Обаче не се връща стойност, докато не се щракне върху някой от другите бутони.
Забележка: За да зададете повече от първия наименуван аргумент, трябва да използвате MsgBox в израз. За да изпуснете някои позиционни аргументи, трябва да включите съответния разделител запетая.
Пример
Забележка: Примерите по-долу илюстрират използването на тази функция във Visual Basic for Applications (VBA).
Този пример използва функцията MsgBox , за да покаже съобщение за критична грешка в диалогов прозорец с бутони "Да" и "Не". Бутонът Не е зададен като отговор по подразбиране. Стойността, върната от функцията MsgBox , зависи от бутона, избран от потребителя. Този пример предполага, че DEMO.HLP е помощен файл, който съдържа тема с номер на контекст "Помощ", равен на 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
