Встроенная функция вывода данных MsgBox

Используется для вывода информации в специальном окне. Данную функцию можно использовать следующим образом:

MsgBox Текст[,Кнопки],[Заголовок]

или:

MyVar = MsgBox (Текст[, Кнопки],[ Заголовок])

Текст – обязательный параметр, определяющий текст, который будет показан в диалоговом окне. Для перевода выводимого текста на новую строку в параметр можно вставить константу VBScript vbCrLf

Кнопки – Необязательный целочисленный параметр, определяющий набор кнопок и вид значка диалогового окна. Если его опустить или установить равным «0», VBScript покажет в окне единственную кнопку – ОК.

Заголовок– Необязательный параметр, определяющий текст заголовка диалогового окна. Если он не задан, Windows выводит в заголовке название приложения.

Замечание: Если необязательный параметр не задан, VBScript использует значение по умолчанию. Чтобы опустить необязательный параметр, надо оставить его место между двумя запятыми пустым.

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

Программа 1: MsgBox “Hello, World!”

Данная программа выводит в специальном окне строчку “Hello, World!”, а также кнопку ОК.

Программа 2: number = 123,09

MsgBox number

Данная программа выводит в специальном окне число 123,09, а также кнопку ОК.

Обратите внимание, что в данных двух программах текст мы заключили в двойные кавычки, а переменную – нет.

В Таблице 3 представлены некоторые константы, сумма которых определят вид «значка», а также наличие кнопки диалогового окна, создаваемого с помощью MsgBox.

Таблица 3 – Перечень констант

Полный список параметров доступен в Visual Basic Script Reference.Сумма значений констант может быть введена следующим образом:

VbYesNoCancel+VbCritical+VbDefaultButton2+VbSystemModal

Или 3+16+256+4096

Или просто 4371

Все эти способы ввода означают одно и тоже.Проиллюстрируем данный пример следующей программой:

MsgBox "Запустить отладку?",VbYesNoCancel+VbCritical+VbDefaultButton2+VbSystemModal

После запуска программы, на экран будет выведено окно с тремя кнопками (Yes , No, Cancel), со значком критического сообщения, причём активной будет вторая кнопка, окно выводится поверх всех окон.

Если вам необходимо оставить значение по умолчанию введите 0:

MsgBox "Произошла ошибка!"&vbCrLf&"Код ошибки: 120002129",0, "Окно ошибки"

MyVar - означает переменную где будет сохранено возвращаемая функцией информация о нажатой кнопке.

В Таблице 4 представлены некоторые из возвращаемых значений.

Замечание: Если вы используете переменную для хранения информации о нажатой кнопке, то параметры, следующие после MsgBox обязательно заключить в круглые скобки, если нет – то скобки использовать не нужно.

Пример:

K=MsgBox( "Ответ", vbYesNoCancel+vbcritical+vbDefaultButton2+vbSystemModal, "привет")

Если же значение нажимаемой кнопки не является важным, функцию следует вызывать следующим образом:

Msgbox "Ответ",vbyesnocancel+vbcritical+vbdefaultbutton2+vbSystemmodal,"привет"

То есть нужно опустить скобки.

Таблица 4 – Перечень возвращаемых значений