Оператор Название Пример

+ Сложение X + Y

- Вычитание X - Y

* Умножение X * Y

/ Деление X / Y

^ Возведение в степень X ^ Y

 

Результатом вычисления элементарного выражения, содержащего оператор сравнения и операнды (сравниваемые данные), является логическое значение, то есть true или false. Так, если условие выполняется (верно, справедливо), то возвращается true. В противном случае возвращается false.

 

Оператор Название Пример

= Равно X ==Y

<> Не равно X <> Y

> Больше, чем X > Y

>= Больше или равно (не меньше) X >= Y

< Меньше, чем X < Y

<= Меньше или равно (не больше) X <= Y

 

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

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

 

Оператор Название Пример

Not Отрицание (НЕ)!X

And И X And Y

Or ИЛИ X Or Y

Xor Исключающее ИЛИ X Xor Y

Eqv Эквивалентность X Eqv Y

Imp Импликация X Imp Y

 

Логические выражения принимают значения True (Истина) или False (Ложь). Смысл первых трех операторов такой же как и операторов!, && и || в JavaScript. Действие остальных операторов можно выразить, используя булеву алгебру, через НЕ, И и ИЛИ следующим образом:

 

Оператор Эквивалентное выражение

X Imp Y Not X Or Y

X Eqv Y (X Imp Y) And (Y Imp X)

X Xor Y (X And Not Y) Or (Not X And Y)

 

К строковым данным применим оператор склейки (конкатенации). В результате действия этого оператора к концу первой строки приписывается вторая строка. В качестве символа оператора склейки строк можно использовать + и &.

Пример:

x = "Саша"

MsgBox x + " и " + "Маша" ‘ Окно с сообщением "Саша и Маша"

MsgBox x & " любит " & "Машу" ‘ Окно с сообщением "Саша любит Машу"

 

Оператор условного перехода if позволяет реализовать структуру условного выражения если …, то …, иначе …

Оператор If имеет несколько вариантов синтаксиса:

If условие Then выражение

If условие Then

Выражения

End If

If условие-1 Then

[выражения-1]

[ElseIf условие-2 Then

[выражения-2]] …

[Else

[выражения-n]]

End If

 

Здесь квадратные скобки указывают лишь на то, что заключенные в них элементы синтаксической конструкции не являются обязательными. Обратите внимание, что блоков вида ElseIf может быть сколько угодно, в то время как блок вида Else может быть использован не более одного раза.

Когда требуется вычислить значение выражения и сравнить его со значениями из заданных списков, удобно использовать оператор Select Case:

Select Case тестируемое_выражение

[Case список_значений-1

[выражения-1]]

[Case список_значений-2

[выражения-2]]

…

[Case список_значений-n

[выражения-n]]

[Case Else

[выражения-n+1]]

End Select

 

Здесь квадратные скобки указывают лишь на то, что заключенные в них элементы синтаксической конструкции не являются обязательными. Список значений может состоять из одного или нескольких элементов. В последнем случае они разделяются запятыми.

С помощью оператора Select Case вычисляется значение тестируемого выражения, которое последовательно сравнивается со значениями из списков блоков Case. Если значение тестируемого выражения совпадает с каким-нибудь значением из списка какого-нибудь блока Case, то выполняются выражения, соответствующие этому блоку. Если значение тестируемого выражения входит в несколько списков, то выполняются выражения самого первого блока Case. После выполнения выражений блока Case управление вычислительным процессом передается оператору, непосредственно следующему за End Select. Если ни один из списков значений, заданных в блоках Case, не содержит значения тестируемого выражения, то выполняются выражения блока Case Else (при его наличии). Если блок Case Else отсутствует, то управление передается оператору, непосредственно следующему за End Select.

 

Пример:

x = InputBox("Сколько Вам лет?")

Select Case x

Case Empty

MsgBox "Вы ничего не ввели"

Case 20,21,22,23,24,25

MsgBox "У Вас все впереди"

Case 40,41,42,43,44,45

MsgBox "Вы достигли главного"

Case Else

MsgBox "Вы ищете свой путь в жизни"

End Select

 

Оператор цикла обеспечивает многократное выполнение блока программного кода до тех пор, пока не выполнится некоторое условие. В VBScript имеются несколько операторов цикла.

Оператор цикла со счетчиком циклов имеет следующий синтаксис:

For счетчик=начальное_значение To конечное_значение [Step приращение]

Выражения

Next

При выполнении этого оператора сначала переменной счетчик присваивается начальное значение. Если это значение не равно заданному конечному значению, то выполняются выражения, указанные в теле оператора цикла. В противном случае выражения не вычисляются, а управление передается оператору, непосредственно следующему за Next. Затем значение счетчика увеличивается на величину приращения, указанную после ключевого слова Step (если его нет, то на 1). Новое значение счетчика сравнивается с конечным значением и далее все повторяется описанным выше способом.

Пример:

‘ Заполнение массива квадратами первых десяти натуральных чисел

Dim myarray(9)

For i=1 To 10

myarray(i-1) = x^2

Next

Оператор For Each … Next позволяет организовать цикл по элементам массива или по объектам из некоторого множества, когда их количество заранее не известно. Этот оператор выполняет заданные выражения для каждого элемента из указанного множества. Он имеет следующий синтаксис: