Главная

Популярная публикация

Научная публикация

Случайная публикация

Обратная связь

ТОР 5 статей:

Методические подходы к анализу финансового состояния предприятия

Проблема периодизации русской литературы ХХ века. Краткая характеристика второй половины ХХ века

Ценовые и неценовые факторы

Характеристика шлифовальных кругов и ее маркировка

Служебные части речи. Предлог. Союз. Частицы

КАТЕГОРИИ:






Встроенная функция вывода данных 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 – Перечень констант

Константа Значение Описание
Группа 1   Появляющиеся кнопки
VbOkOnly   Кнопка Ok
VbOkCancel   Кнопки Ok и Cancel
VbAbortRetryIgnore   Кнопки Abort, Retry и Ignore
VbYesNoCancel   Кнопки Yes, No и Cancel
   
Группа 2   Появляющийся значок
VbCritical   Критический значок
   
Группа 3   Кнопка выбранная по умолчанию
VbDefaultButton2   Вторая кнопка
   
Группа 3   Вывод на экран
VbSystemModal   Окно выводится поверх всех открытых окон

 

Полный список параметров доступен в 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 – Перечень возвращаемых значений






Не нашли, что искали? Воспользуйтесь поиском:

vikidalka.ru - 2015-2024 год. Все права принадлежат их авторам! Нарушение авторских прав | Нарушение персональных данных