Управляющие структуры

Remarks

End Sub

Перед вызовом функций LBound и UBound необходимо проверить переменную функцией IsArray.

Операторы, используемые в выражениях

Оператор	Пример использования	Описание
+	a + b	Сложение двух чисел
-	a - b	Вычитание
*	a * b	Умножение
/	a / b	Деление
\	a \ b	Целочисленное деление
Mod	a Mod b	Возвращается остаток от деления
^	a ^ b	Возведение в степень
And	выражение1 And выражение2	Логическое “И”
=	выражение1 = выражение2	Оператор эквивалентности
>	выражение1 > выражение2	Оператор сравнения “больше”
>=	выражение1 >= выражение2	Оператор сравнения “больше или равно”
<>	выражение1 <> выражение2	Оператор сравнения “не равно”
<	выражение1 < выражение2	Оператор сравнения “меньше”
<=	выражение1 <= выражение2	Оператор сравнения “меньше или равно”

Математические функции VBA

Функция	Пример использования	Описание	Тип возвращаемого результата
Abs	Abs(x)	Модуль числа x	Совпадает с типом числа x
Atn	Atn(x)	Арктангенс числа x	Double
Cos	Cos(x)	Косинус числа x	Double
Exp	Exp(x)	Экспоненциальная функция (в степени x)	Double
Fix	Fix(x)	Возвращает целую часть числа x. Если x - отрицательное, то возвращаемое значение округляется в большую сторону (напр., если x=-1.5, возвращается -1).	Integer
Int	Int(x)	Возвращает целую часть числа x. Если x - отрицательное, то возвращаемое значение округляется в меньшую сторону (напр., если x=-1.5, возвращается -2).	Integer
Log	Log(x)	Натуральный логарифм числа x	Double
Rnd	Rnd или Rnd(x)	Генерируется случайное число. Если аргумент не указан – генерируется число в диапазоне от 0 до 1	Single
Sgn	Sgn(x)	Знак числа (1 0 -1)	Integer
Sin	Sin(x)	Синус числа x	Double
Sqr	Sqr(x)	Квадратный корень из x	Double
Tan	Tan(x)	Тангенс числа x	Double

Для перевода x из градусов в радианы: x = x * π / 180

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

If - Then - Else - выполняет группу инструкций, если соблюдено некоторое условие;

For – Next – выполняет группу инструкций заданное число раз;

While – Wend - выполняет группу инструкций, пока соблюдается некоторое условие;

Do – Loop - выполняет группу инструкций, пока соблюдается или не соблюдается некоторое условие;

Select Case – в зависимости от значения некоторой переменной или результата проверки условия выполняет одну или несколько возможных групп инструкций;

For – Each – Next - выполняет действия над каждым объектом семейства или элементом массива.

Управляющая инструкция If - Then – Else

Условная инструкция If - Then – Else изменяет порядок выполнения инструкций в зависимости от результатов проверки некоторого условия.

Оператор ветвления

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

If <условие1> Then
<Блок 1>
[ ElseIf <условие2> Then
<Блок 2>
· · ·]
[Else
<Блок N>]
End If

Оператор работает следующим образом: если (If) выполняется <условие 1>, то (Then) будет выполнена последовательность операторов <Блок 1>, иначе, если (ElseIf) выполняется <условие 2>, то будет выполнен <Блок 2> и т.д., иначе (Else) - <Блок N>.

Допустима форма записи оператора ветвления в одну строку:

If <условие1> Then <Оператор 1>: <Оператор 2>:...: <Оператор N>

В этом случае не указывается конец оператора (End If) как в первом варианте.

Пример:

Sub IfThenElse()

num = GetRandomNumber

If num = 7 Then

MsgBox "Congratulations! You received the winning " _

& num & "."

Дата добавления: 2014-01-07