Функция MsgBox
MsgBox(Prompt, [Buttons], [Title], [HelpFile], [Context])
Функция MsgBox выводит на экран диалоговое окно, содержащее сообщение, устанавливая режим ожидания нажатия кнопки пользователем
Возвращаемое значение
Возвращает значение типа Integer, указывающее, какая кнопка была нажата
Ниже перечислены значения, содержащие код нажатой кнопки:
Константа |
Значение |
Нажатая кнопка |
vbOK |
1 |
OK |
vbCancel |
2 |
Отмена (Cancel) |
vbAbort |
3 |
Прервать (Abort) |
vbRetry |
4 |
Повторить (Retry) |
vbIgnore |
5 |
Пропустить (Ignore) |
vbYes |
6 |
Да (Yes) |
vbNo |
7 |
Нет (No) |
Параметры
Функция содержит именованные аргументы
Часть |
Описание |
Prompt |
Обязательный. Строковое выражение, отображаемое как сообщение в диалоговом окне. Максимальная длина строки составляет приблизительно 1024 символа. Длинный текст разбивается автоматически, но можно задавать разбиение строки явно, используя символы возврата каретки и перевода строки(vbCrLf) |
Buttons |
Необязательный аргумент - целочисленная константа, которая является суммой VB-констант, определяющих ряд характеристик диалогового окна - число и тип кнопок, тип значка, основная кнопка, модальность окна сообщения(см.ниже). Значение по умолчанию равно 0 |
Title |
Необязательный. Строковое выражение, отображаемое в строке заголовка диалогового окна. Максимальное число символов для заголовка около 50. Если этот параметр опущен, в строку заголовка помещается имя приложения |
HelpFile |
Необязательный. Строковое выражение, определяющее имя файла Справки, содержащего контекстно-зависимую Справку о данном диалоговом окне. Если этот параметр указан, то необходимо задать также и параметр Context |
Context |
Необязательный. Числовое выражение, определяющее номер соответствующего раздела справочной системы. Если этот параметр указан, то необходимо задать также и параметр HelpFile |
Константы, используемые в аргументе Buttons для задания вида выводимых кнопок, пиктограмм
Константа |
Значение |
Описание |
vbOKOnly |
0 |
Отображается только кнопка "OK" |
vbOKCancel |
1 |
Отображаются кнопки "OK" и "Отмена" (Cancel) |
vbAbortRetryIgnore |
2 |
Отображаются кнопки "Прервать" (Abort), "Повторить" (Retry) и "Пропустить" (Ignore) |
vbYesNoCancel |
3 |
Отображаются кнопки "Да" (Yes), "Нет" (No) и "Отмена" (Cancel) |
vbYesNo |
4 |
Отображаются кнопки "Да" (Yes) и "Нет" (No) |
vbRetryCancel |
5 |
Отображаются кнопки "Повторить" (Retry) и "Отмена" (Cancel) |
vbCritical |
16 |
Используется значок "Критическое сообщение" |
vbQuestion |
32 |
Используется значок "Предупреждающий запрос" |
vbExclamation |
48 |
Используется значок "Предупреждение" |
vbInformation |
64 |
Используется значок "Информационное сообщение" |
vbDefaultButton1 |
0 |
Основной является первая кнопка |
vbDefaultButton2 |
256 |
Основной является вторая кнопка |
vbDefaultButton3 |
512 |
Основной является третья кнопка |
vbDefaultButton4 |
768 |
Основной является четвертая кнопка |
vbApplicationModal |
0 |
Модальное окно на уровне приложения: чтобы продолжить работу с текущим приложением, необходимо ответить на данное сообщение |
vbSystemModal |
4096 |
Модальное окно на уровне системы: все приложения будут недоступны до тех пор, пока пользователь не ответит на данное сообщение |
vbMsgBoxHelpButton |
16384 |
Добавляется кнопка Справка(Help) |
VbMsgBoxSetForeground |
65536 |
Аналогично параметру vbApplicationModal |
vbMsgBoxRight |
524288 |
Текст выравнивается по правому краю |
vbMsgBoxRtlReading |
1048576 |
Задает порядок вывода текста справа налево для арабской системы и иврит |
Примечание
Если используется кнопка Отмена(Cancel), то можно вместо нее нажимать на клавишу Esc
В отличие от InputBox окно MsgBox не позиционируется на экране, а всегда располагается в центре экрана
Пример
Dim retval As Integer
retval = MsgBox("А ты посетил сайт http://www.excelworld.ru ?", _
vbQuestion + vbYesNo, "Мир Excel")
Категория
Функции загрузки данных |