Книга: Windows Script Host для Windows 2000/XP

Функция MsgBox языка VBScript

Функция MsgBox языка VBScript

В языке VBScript существует специальная функция MsgBox, с помощью которой можно выводить информацию в диалоговое окно с несколькими кнопками; также в этом окне можно задавать заголовок и значок (рис. 2.5).

Рис. 2.5. Диалоговое окно, созданное с помощью функции MsgBox

Пример сценария, создающего такое диалоговое окно, приведен в листинге 2.11.

'*******************************************************************
' Имя: MsgBox.vbs
' Язык: VBScript
' Описание: Пример использования функции MsgBox
'*******************************************************************
Dim Res,Text,Title  ' Объявляем переменные
Text="Пример вывода строк в диалоговое" & vbCrLf & " окно VBScript"
Title="Заголовок"
' Выводим диалоговое окно на экран
Res=MsgBox(Text,vbOkCancel+vbInformation+vbDefaultButton2,Title)
' Определяем, какая из кнопок была нажата в диалоговом окне
If Res=vbOk Then
 MsgBox "Нажата кнопка OK"
Else
 MsgBox "Нажата кнопка Отмена"
End If
'*************  Конец *********************************************

Подробное описание функции MsgBox приведено в приложении 1. Здесь же мы отметим только то, что значением функции MsgBox является константа, соответствующая нажатой в диалоговом окне кнопки (в нашем примере такими константами являются vbOk и vbCancel). Таким образом, MsgBox может использоваться в сценариях для организации выбора пользователем одного из возможных вариантов, однако это не совсем удобно, т.к. надписи на кнопках нельзя задавать произвольным образом (можно указать только OK, Отмена, Стоп, Повтор, Пропустить, Да и Нет).

Оглавление книги