В классической базе данных Access функция MsgBox отображает сообщение в диалоговом окне, ожидает, пока пользователь нажмет кнопку, и возвращает целое число , указывающее, какую кнопку нажал пользователь.
Синтаксис
MsgBox(prompt [, button ] [, title ] [, helpfile ] [, context ] )
Функция MsgBox имеет следующие аргументы:
| Аргумент | Описание |
|---|---|
| сообщение | Обязательный аргумент. Строковое выражение, отображаемое как сообщение в диалоговом окне. Максимальная длина запроса составляет около 1024 символов в зависимости от ширины используемых символов. Если запрос состоит из нескольких строк, можно разделить строки с помощью символа возврата каретки (Chr(13)), символа канала строк (Chr(10)) или возврата каретки — сочетания символов канала строки (Chr(13) & Chr(10)) между каждой строкой. |
| кнопки | — необязательный аргумент. числовое выражение, которое представляет собой сумму значений, указывающих количество и тип отображаемых кнопок, используемый стиль значка, удостоверение кнопки по умолчанию и модальность окна сообщения. Если этот параметр опущен, значение по умолчанию для кнопок равно 0. |
| заголовок | Необязательный аргумент. Строковое выражение, отображаемое в заголовке диалогового окна. Если опустить заголовок, имя приложения помещается в строку заголовка. |
| файл_справки | Необязательный аргумент. Строковое выражение, определяющее файл, в котором содержится контекстная справка для данного диалогового окна. Если указан файл справки , необходимо также указать контекст . |
| контекст | Необязательный аргумент. Числовое выражение, представляющее собой номер контекста, присвоенный автором справки соответствующему разделу. Если задан контекст , необходимо также указать файл справки . |
Параметры
Параметры аргументов кнопок:
| Константа | Значение | Описание |
|---|---|---|
| vbOKOnly | 0 | Отображается только кнопка ОК. |
| vbOKCancel | 1 | Отображаются кнопки ОК и Отмена. |
| vbAbortRetryIgnore | 2 | Отображаются кнопки Прервать, Повторить и Пропустить. |
| vbYesNoCancel | 3 | Отображаются кнопки Да, Нет и Отмена. |
| vbYesNo | 4 | Отображаются кнопки Да и Нет. |
| vbRetryCancel | 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) определяет модальность окна сообщения. При добавлении чисел для создания окончательного значения для аргумента button используйте только одно число из каждой группы.
Примечание
Эти константы задаются Visual Basic для приложений. В результате имена можно использовать в любом месте кода вместо фактических значений.
Возвращаемые значения
| Константа | Значение | Описание |
|---|---|---|
| vbOK | 1 | ОК |
| vbCancel | 2 | Отмена |
| vbAbort | 3 | Прервать |
| vbRetry | 4 | Повторить |
| vbIgnore | 5 | Пропустить |
| vbYes | 6 | Да |
| vbNo | 7 | Нет |
Замечания
При указании файла справки и контекста пользователь может нажать клавишу F1 (Windows) или HELP (macOS), чтобы просмотреть раздел справки, соответствующий контексту. Некоторые хост-приложения, например Microsoft Excel, также автоматически добавляют в диалоговое окно кнопку Справка .
Если в диалоговом окне отображается кнопка Отмена , нажатие клавиши ESC имеет тот же эффект, что и нажатие кнопки Отмена. Если диалоговое окно содержит кнопку "Справка ", для диалогового окна предоставляется контекстная справка. Однако значение не возвращается, пока не будет нажата одна из других кнопок.
Примечание
Чтобы указать больше первого именованного аргумента, необходимо использовать MsgBox в выражении. Чтобы опустить некоторые позиционные аргументы, необходимо включить соответствующий разделитель запятых.
Пример
Примечание
В примерах ниже показано, как использовать эту функцию в модуле Visual Basic для приложений (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