Использование стандартных окон ввода и вывода в языке

Стандартное диалоговое окно InputBox используется для ввода небольших фрагментов текста. Окно InputBox состоит из четырех элементов:

строка заголовка;

приглашение к вводу;

поле ввода со значением, предлагаемым по умолчанию;

две кнопки (ОК и Cancel).

Функция InputBox выводит на экран диалоговое окно, содержащее сообщение и поле ввода, устанавливает режим ожидания ввода текста пользователем или нажатия кнопки, а затем возвращает значение типа String, содержащее текст, введенный в окне.

Функция имеет следующий синтаксис:

InputBox(приглашение[, заголовок] [, умолчание] [, Хпоз][Yпоз][,файл справки, контекст]).

Приглашение — строковое выражение, отображаемое как сообщение в диалоговом окне. Приглашение служит подсказкой пользователю, какую информацию он должен ввести в специальное поле ввода, находящееся в окне.

Заголовок — строковое выражение, отображаемое в заголовке диалогового окна. Если заголовок опущен, в строку заголовка помещается имя приложения.

Умолчание — строковое выражение, отображаемое в поле ввода и используемое по умолчанию, если пользователь не введет другой строки. Если этот параметр опущен, поле ввода изображается пустым.

Хпоз — числовое выражение, задающее расстояние по горизонтали между левой границей диалогового окна и левым краем экрана (в твипах). Если этот параметр опущен, то диалоговое окно выравнивается по центру экрана по горизонтали.

Yпоз — числовое выражение, задающее расстояние по вертикали между верхней границей диалогового окна и краем экрана. Если параметр опущен, то диалоговое окно помещается по вертикали примерно на 1/3 высоты экрана.

Файл справки — строковое выражение, определяющее имя файла справки, содержащего справочные сведения о данном диалоговом окне. Если этот аргумент указан, необходимо также указать аргумент «контекст».

 

Контекст — числовое выражение, определяющее номер соответствующего раздела справочной системы. Если этот аргумент указан, то необходимо указывать аргумент «файл справки».

 

Возвращаемым значением данной функции является информация, вводимая пользователем. Visual Basic автоматически присваивает этой информации тип String. Если вместо ввода информации пользователь просто нажимает кнопку ОК или клавишу Enter, функция возвращает пустую строку (""). Функцию InputBox с двумя и большим числом аргументов можно использовать только в выражении. Наличие запятых, соответствующих отсутствующим аргументам, обязательно.

 

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

текст сообщения;

заголовок;

пиктограмма;

набор кнопок.

 

MsgBox можно вызывать как процедуру и как функцию. Процедура выводит на экран заданное пользователем текстовое сообщение. Синтаксис вызова процедуры следующий:

 

MsgBox текст[, опция] [, заголовок] [, файл справки, контекст].

 

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

 

переменная = MsgBox(TeKcr[, опция] [, заголовок] [, файл справки, контекст]).

 

Текст — строковое выражение, отображаемое как сообщение в диалоговом окне (максимальная длина 1024 символа)

 

Опция — дополнительная информация. Эта опция представляет собой числовое значение, составленное как сумма значений, которые указывают число и тип отображаемых кнопок, тип используемого значка, основную кнопку. Таким образом, опция = Button + Icon + Default. Каждому из параметров соответствует числовое значение, узнать которое можно, вызвав справочную систему Visual Basic. Редактор программного кода позволяет сформировать значение опции, выбирая нужные значения из предлагаемого списка.

 

Заголовок — строковое выражение, отображаемое в строке заголовка диалогового окна. Если этот аргумент опущен, то в строку заголовка помещается имя приложения.

 

Файл справки — строковое выражение, определяющее имя файла справки, содержащего справочные сведения о данном диалоговом окне. Если этот аргумент указан, необходимо также указать аргумент «контекст».

 

Контекст — числовое выражение, определяющее номер соответствующего раздела справочной системы. Если этот аргумент указан, то необходимо указывать аргумент «файл справки».

 

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

 

 

Операторы условного перехода в языке VBS

К управляющим структурам относятся операторы условного перехода и цикла. Оператор условного перехода позволяет выполнить те или иные строки программы в зависимости от логических условий. В языке VBScript он может использоваться в двух различных видах (строчный и блочный синтаксисы). Строчный синтаксис:If <условие> Then <операторы1> [Else <операторы2>] Строчный синтаксис следует использовать для коротких, простых условных операторов. Пример строчного синтаксиса: If A <= 9 Then A = A + 1: B = B + A Else B = B + A Блочный синтаксис является более структурированным, имеет большие возможности, легче читается и отлаживается.

Блочный синтаксис оператора условного перехода:

If <условие> Then [операторы]

[ElseIf <условие-n> Then [операторы-n]]...

[Else [else-операторы]]

End If

где: условие – логическое выражение, результатом вычисления которого может быть истина (True), ложь (False) или Null которое приравнивается к False (правила написания приведены далее в подразделе 5.3.1.11); операторы – один оператор или более (разделенных двоеточиями для строкового синтаксиса); выполняются, если условие истинно (True); условие-n – то же, что и условие; операторы-n – выполняются, если условие-n является истиной (True); else-операторы – один оператор или более, выполняющиеся, если предшествующие условия не были истинны. Когда выполняется блочный If, проверяется условие, и, если оно истинно (True), выполняются операторы, следующие за Then. Если условие не является истинным (False), каждое условие-n, идущее за ElseIf (если они есть) проверяется. Когда истинное значение найдено, выполняются операторы-n, следующие за Then после истинного условия, после чего программа выходит за End If (т. е. последующие ElseIf, если они есть, не проверяются). Если истинных условий для ElseIf не найдено, выполняются else-операторы, следующие за Else. Пример блочного синтаксиса:

a = 1 If a > 10 Then

MsgBox "a > 10" ElseIf a > 0 Then MsgBox "a > 0" 'будет выполнено только это!

ElseIf a = 1 Then MsgBox "a = 1"

Else MsgBox "Нет данных для заданного значения a "

End If

Оператор выбора Case позволяет выполнить те или иные операторы в зависимости от множества значений заданного выражения или переменной. Синтаксис оператора выбора:

Select Case <тест-выражение>

[Case <список_выр-n>

[<операторы-n>]]...

[Case Else

[<else-операторы-n>]]

End Select

где: тест-выражение – любое числовое или строковое выражение; список_выр-n – список из одного или более выражений для соответствующего Case; операторы-n – один оператор или несколько, выполняющихся, если тест-выражение имеет то же значение, что и значение одного из выражений списка-n;

else-операторы-n – один оператор или несколько, выполняющихся, если тест-выражение не совпадает ни с одним из значений Case - структур.

 

 

Операторы цикла в языке VBS

Оператор цикла позволяет выполнить группу операторов несколько раз в соответствии с заданными условиями повтора. Существует несколько видов операторов цикла:

Do... Loop While... Wend For... Next For Each... Next.

Синтаксис оператора Do...Loop следующий (здесь и далее в фигурных скобках {} приведены два возможных варианта, разделенных вертикальной чертой |, один из которых необходимо использовать):

1) первый вариант – проверка условия в начале цикла

Do [{While | Until} <условие>]
[<операторы>]
[Exit Do]
[<операторы>]
Loop

2) второй вариант – проверка условия в конце цикла

Do
[<операторы>]
[Exit Do]
[<операторы>]
Loop [{While | Until} <условие>]

где: условие – логическое выражение, которое имеет значение истина (True) или ложь (False); значение условия Null то же, что и False; для While (англ. пока) выполнение цикла продолжается, пока условие истинно, для Until (англ. до) – выход из цикла, когда условие истинно;

операторы – один или несколько операторов, выполнение которых повторяется, пока условие после While истинно (True) или условие после Until ложно (False);

Exit Do – может использоваться, как альтернативный выход из цикла (на следующую строку программы после Loop); любое количество Exit Do может быть помещено внутри цикла. Обычно эта команда используется с вычисляемым логическим выражением оператора If...Then.

Синтаксис оператора цикла While...Wend следующий: While <условие> [<операторы>] Wend

Выполнение операторов цикла повторяется, пока <условие> истинно (True).

Синтаксис оператора цикла For...Next следующий:

For <счетчик> = <нач.знач.> To <кон.знач.> [Step <шаг>]
[<операторы>]
[Exit For]
[<операторы>]
Next

где: счетчик – числовая переменная, используемая как счетчик цикла; может быть положительной или отрицательной величиной; нач.знач. – начальное значение счетчика; кон.знач. – конечное значение счетчика; шаг – шаг изменения счетчика; на данную величину автоматически изменяется счетчик после каждого выполнения операторов цикла; если шаг не указан, значит он равен 1; операторы – выполняются повторно столько раз, сколько определено значениями, заданными для счетчика: один раз, много раз или ни одного;

Exit For – может использоваться, как альтернативный выход из цикла; обычно используется с проверкой условия выхода в операторе If...Then; выход выполняется на строку программы, следующую за Next.

Синтаксис оператора цикла For Each...Next следующий:

For Each <элемент> In <группа>
[операторы]
[Exit For]
[операторы]
Next [<элемент>]

где:

элемент – переменная, которая используется для перебора всех элементов коллекции или массива;

группа – имя коллекции объектов или массива.