Чтение онлайн

В VBA имеется семь знаков арифметических операций (см. табл. 7.2). Что делают четыре из них, вы определите сами с первого взгляда на них - это •+-, -, * и /.Например, результатом выражения 6/2 будет, конечно же, 3.

А вот остальные три знака арифметических операций не так очевидны. Они выполняют следующие действия.

* Операция ́ возводит первое значение в выражении в степень, равную второму значению. Например, результатом вычисления выражения

2 ́ 3

будет 8 (2 в 3 степени).

* Операция \ представляет целочисленное деление, в результате которого всегда получается целое число. VBA просто отбрасывает дробную часть, а не округляет результат. (Замечание. Эта операция представлена обратной косой чертой в отличие от обычного деления, которое представлено обычной косой чертой.) Например.

244 \ 7

равно 34, что соответствует числу полных недель в периоде времени, составляющем 244 дня.

* При выполнении операции Mod первое значение тоже делится на второе, но в качестве результата возвращается остаток от деления. Продолжая тему предыдущего примера, если вы захотите узнать, на сколько дней период времени в 244 дня превышает 34 полностью поместившиеся в нем недели, нужным выражением для вычисления этого будет

244 Mod 7

что в результате дает 6. Обратите внимание, что результатом выполнения операции Mod всегда будет целое число. Если вы захотите узнать дробную часть от деления в десятичной форме, используйте выражение типа

(244 Mod 7) / 7

Это то же самое, что и 6/7, или примерно 0,857.

В VBA используется шесть операций сравнения для сравнения числовых и строковых значений, а также две специальные операции Like (для строк) и Is (для объектов).

Заметьте, что знак равенства в YBA (=) используется в двух разных случаях.

В объявлении равенство используется для присваивания значения переменной (см. выше раздел "Размещение информации в переменных"), а в качестве операции сравнения знак равенства определяет, будут ли два значения одинаковыми.

Результатом вычисления выражения, основанного на этих операциях, всегда является либо True (Истина), либо False (Ложь). Например, вот выражение с использованием операции <= (меньше или равно):

intX <= 12

Если значением intX является 12, то результатом выражения будет False, поскольку 12 не меньше, чем 12.

Чаще всего выражения с операциями сравнения используются в условных операторах типа If . . . Then. Условные операторы будут подробно обсуждаться в главе 8, но следующий пример нелишний и здесь:

If intX = 2000 Then

Застолье

End If

Здесь с помощью знака операции - выясняется, равны ли значения по обе стороны от него. Если значения равны, то результатом выражения будет True (Истина), иначе False (Ложь); другими словами: '"Если значение intX равно 2000, то выполнить процедуру Застолье".

Знаки операций сравнения можно использовать для сравнения строк текста и чисел.

Выражение

"Петуния" = "Нарцисс"

в результате дает False - и это очевидно, поскольку эти две строки не одинаковы.

Но есть случаи, когда результат сравнения строк предсказать не так просто. Чтобы получать правильные результаты при сравнении строк, нужно знать, по каким правилам VBA решает, что одна строка '"больше", чем другая.

Если вы не потребуете сравнивать иначе, VBA будет использовать метод двоичного сравнения. Две строки будут сравниваться на основе числовых кодов входящих в эти строки символов, т.е. кодов, которыми символы представляются в программе. В такой системе кодирования наименьшие числа соответствуют знакам пунктуации, за ними следуют цифры, затем прописные буквы, строчные и, наконец, буквы с акцентами (последнее касается латинской кодировки, поскольку в случае кириллической колировки на месте букв с акцентами находятся русские буквы). В этом случае, ввиду того, что коды строчных букв больше кодов прописных букв, выражения "а" > "А" и "а" > "Z", например, оба дают в результате True.

При сравнении строк VBA начинает сравнивать первые символы этих строк. Если первые символы различны, большей строкой будет та. первый символ которой больше. Если же первые символы равны, VBA сравнивает следующие символы, и т.д.

Чтобы при сравнении использовался другой, интуитивно более понятный метод, поместите в раздел объявлений модуля оператор Option Compare Text.

В результате этого сравнение строк будет выполняться по алфавиту без учета регистра букв (но все равно будет считаться, что буквы с акцентами имеют более высокие коды, чем соответствующие им буквы без акцентов). В этом случае следующие выражения дадут в результате True (Истина):

"а" = "А"

"а" < "Z"

Но что будет, если придется сравнивать строки неравной длины? Если начало одной строки в точности совпадает с другой, более короткой строкой, то длинная строка считается больше короткой. Например:

"В горах, в пещере" > "В горах" дает в результате True (Истина).

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