5) Операторы присваивания. Приоритет операций и порядок вычислений.
Используются для задания переменным различных значений. Если применяется переменная а, имеющая значение Back Color (цвет фона), оператор присваивания выглядит так:
a = Back Color.Red
Если рассматривается переменная b, числовое значение которой систематически увеличивается на единицу, оператор присваивания записывается следующим образом:
b = b+1
Слева от знака равенства указывается имя переменной, справа – ее значение, но не наоборот. Таким образом, переменным могут присваиваться числовые, текстовые значения, значения свойств объектов, других переменных. Переменные могут также представлять объекты, например формы или элементы управления.
VBA выполняет операции в соответствии с их приоритетами, что обеспечивает однозначность в трактовании значений выражений. Приведем приоритеты выполнения операций.
|
Приоритет |
Операция |
|
1 |
Вызов функции и скобки |
|
2 |
^ |
|
3 |
- (смена знака) |
|
4 |
*, / |
|
5 |
\ |
|
6 |
Mod |
|
7 |
+, - |
|
8 |
>, <, >=, <=, <>,= |
|
9 |
Not |
|
10 |
And |
|
11 |
Or |
|
12 |
Xor |
|
13 |
Equ |
|
14 |
Imp |
7) Операторы If-Then и If-Then-Else.
Оператор If…Then... Else применяется, когда нужно проверить соответствие одному условию и в случае соответствия сделать какое-то действие, а в случае несоответствия выполнить другое действие:
Синтаксис составного условного оператора, если Вы пишите программу структурно, следующий:
If <логическое выражение> Then
P1
P2
.
.
PN
Else
M1
M2
.
.
MN
End If
Да Нет
Возможна и другая запись (в одну строку):
If <лог. выраж.> Then P1 : P2 : ... : PN Else M1 : M2 : ... MN
где If, Then, Else, End If - зарезервированные слова, а P1, P2,PN, M1, M2,MN – операторы.
Если Логические выражение принимает значение True, то выполняется инструкция (оператор, или инструкции, операторы) после Then, если False, то выполняется инструкция (или инструкции) после Else. Ветвь Else является необязательной.
If nTemperature < 10 Then
MsgBox "Одеть куртку"
Else
MsgBox "Одеть ветровку"
End If
8) Оператор If с несколькими альтернативами.
Синтаксис многозначных ветвлений, если Вы пишите программу структурно, следующий:
If <лог. выражение1> Then
P1
ElseIf <лог. выражение2> Then
P2
ElseIf <лог. выражение3> Then
P3
Else
P4
End If
Возможна и другая запись (в одну строку):
If <лог. выражение1> Then P1 ElseIf <лог. выражение2> Then P2 ElseIf <лог. выражение3> Then P3 Else P4
где If, Then, Else, End If - зарезервированные слова, а P1, P2,P3 P4,- операторы
Когда нужно проверить на соответствие нескольким условиям возможна запись:
If (nTemperature < 10) And (bRain = True) Then
MsgBox "Одеть куртку и взять зонтик"
End If
Некоторые замечания по использованию If…Then... Else:
-
ключевое слово Then должно находиться в одной строке с If и условием. Если вы перенесете его на следующую строку, будет выдано сообщение об ошибке;
-
если разместить команду, которую нужно выполнить при истинности проверяемого условия, на одной строке с If и Then, то End If можно не писать:
If nTemperature < 10 Then MsgBox "Одеть куртку"
-
если же вы используете несколько команд или конструкции Else/ElseIf, то End If в конце нужно писать обязательно – иначе возникнет синтаксическая ошибка.
-
операторы If…Then можно вкладывать друг в друга:
If MyVar1 = 5 Then
MsgBox “MyVar1 = 5”
If MyVar2 = 10 Then
MsgBox “MyVar2 = 10”
End If
End If