назад | содержание | вперед

Окно сообщения (MsgBox)

Диалоговое окно сообщения (рис. 7.19) не требует проектирования и вызы вается из программы командой MsgBox или с помощью аналогичной функции MsgBox о, имеющей следующий синтаксис:

MsgBox (prompt[, buttons] [, title] [, helpfile, context])

где:

• prompt — текст сообщения в диалоговом окне. Максимальная длина текста 1024 символа. В этот текст можно вставить в качестве разделителей строк перевод каретки Chr(13), перевод строки Chr(lO) или их комбинацию;
• buttons — числовое выражение, которое задает параметры для кнопок управления и значков в диалоговом окне и составлено из констант, указанных в табл. 7.8 и 7.9. Если значение не указано, то по умолчанию присваивается значение 0;
• title — текст заголовка диалогового окна;
• helpfile — ссылка на файл справочной системы;
• context — ссылка на содержание в файле справочной системы.

Необходимо иметь в виду, что для задания нескольких параметров кнопок и значков одновременно, следует просто сложить соответствующие константы.

Для примера введите в командном окне среды проектирования Immediate следующую команду и нажмите клавишу <Enter>:

MsgBox "Приветствуем Вас!", vbYesNo + vbExclamation,"Окно сообщений"

В ответ получите диалоговое окно, показанное на рис. 7.19.

Рис. 7.19. Диалоговое окно сообщения

Таблица 7.8. Константы параметров для значков диалогового окна сообщения

Значок	Константа	Значение	Тип сообщения
	vbExclamation	48	Предупреждение
	vbQuestion	32	Запрос
	vbInformation	64	Информация
	vbCritical	16	Ошибка

В диалоговых окнах сообщении можно управлять отображаемыми в окне сообщения кнопками и установкой фокуса на одной из кнопок при открытии окна. Для этого можно использовать константы, приведенные в табл. 7.9.

Таблица 7.9. Константы параметров наличия кнопок в окне сообщения и установки фокуса на кнопку

Константа	Значение	Набор кнопок в диалоговом окне
vbOkOnly	0	OK
vbOkCancel	1	OK, Отмена
vbAbortRetryIgnore	2	Стоп, Повтор, Пропустить
vbYesNoCancel	3	Да, Нет, Отмена
vbYesNo	4	Да,Нет
vbRetryCancel	5	Повтор, Отмена
vbDefaultButton1	0	Устанавливает фокус на первой кнопке
vbDefaultButton2	256	Устанавливает фокус на второй кнопке
vbDefaultButton3	512	Устанавливает фокус на третьей кнопке
vbDefaultButton4	768	Устанавливает фокус на четвертой кнопке
vbApplicationModal	0	Назначает модальность приложения. Диалоговое окно будет модальным, то есть требующим обязательного закрытия для перехода в другие окна
vbSystemModal	4096	Назначает модальность системы. Диалоговое окно будет модальным на уровне системы, то есть пока диалоговое окно не закрыто, в любое другое приложение перейти нельзя
vbMsgBoxHelpButton	16384	Добавляет в диалоговое окно кнопку Справка
VbMsgBoxSetForeground	65536	Объявляет диалоговое окно фоновым окном
vbMsgBoxRight	524288	Выравнивает текст в диалоговом окне по правому краю
vbMsgBoxRtIReading	1 048 576	Переворачивает текст для чтения справа налево

В зависимости от выбора кнопки диалоговое окно MsgBox возвращает одно из значений, заданных системными константами. Это необходимо для анализа нажатой кнопки и выполнения соответствующих действий в программе. В исходном коде для этого можно использовать константы, указанные в табл. 7.10.

Таблица 7.10. Значения констант, возвращаемые кнопками окна сообщения

Кнопка	Константа	Значение при нажатии на кнопку
ОК	vb0k	1
Отмена	vbCancel	2
Стоп	vbAbort	3
Повтор	vbRetry	4
Пропустить	vblgnore	5
Да	vbYes	6
Нет	vbNo	7

назад | содержание | вперед