Исполняемые операторы
Исполняемые операторы используются для выполнения следующих задач: вызов пользовательских функций; активизация методов объектов;
управление порядком выполнения других операторов; выполнение встроенных функций VBA.
Как правило, один оператор занимает в VBA-программе одну строку.
Если строка программного кода слишком длинна, то ее можно разместить на 2-х и более строках используя знак подчеркивания. Например,
Msgbox "Эта строка - " & St & _
"является слишком длинной"
•Если же необходимо разместить несколько операторов на одной строке, используется знак двоеточия. Например,
Dim A As Byte, В As Byte, С As Integer
A=20 : B=12 : C=48
Комментарии
Комментарии в VBA-программе начинаются со знака английского апострофа. Например,
Dim A As Byte, В As Byte :
3 Операции в VBA
Операция представляет собой специальный символ (-,+ и т.д.) или ключевое слово (Or, And и т.д.), комбинирующее два значения (операнда) с целью получения нового результата
VBA-оперции разделяются на 4 группы: арифметические, логические, сравнения и оператор конкатенации.
Обозначение |
Пояснение |
Пример |
Арифметические операции |
||
+ - |
Сложение, вычитание |
А+4 |
* 1 |
Умножение, деление |
А*Ь/с |
л |
Возведение в степень |
В"4 |
\ |
Целочисленное деление. Возвращает |
5\2 |
|
целую часть от деления двух целых чисел |
результат->2 |
mod |
Возвращает остаток от деления двух |
5 mod Я |
|
целых чисел |
результат-> 1 |
Логические операции |
||
Not |
Логическое отрицание. Меняет |
А = True |
|
значение своего операнда на |
В = Not А |
|
противоположное |
В -> False |
And |
Логическое «И». Возвращает Истицу, |
A=True : В False |
|
если все без исключения условия верны, |
С = A And В |
|
иначе Ложь. |
С -> False |
Or |
Логическое «Или». Возвращает |
А =3 : В -5 |
|
Истину, если истинно хотя бы одно |
С (А>6) Or (В< 10) |
|
условие. |
С —>Тгио |
XOR |
«Исключающие Или». Возвращает |
A True : В True : С: i 'je |
|
Ложь, если все условия возвращают одинаковые значения, все истинны или все ложны. Возвращает Истину, если условия |
D A XOR В D-> False 1) В XOR С |
|
D-> 1 rue |
|
|
исключают друг друга. |
|
Операции сравнения |
||
|
Знак равенства |
|
■ |
Не равно |
|
< |
Меньше |
|
> |
Больше |
|
<= |
Меньше либо равно |
|
|
Больше либо равно |
|
Like |
Сравнение строк с заданным |
A-'Hello!" |
|
образцом. В образце могут использоваться |
C= A Like "1 1ривет!" |
|
подстановочные символы: *,? и др. |
С A Like "He*" С -> True |
Is |
Проверка идентичности ссылок на объект |
|
Знак конкатенации |
||
& |
Объединяет строки. |
MsgBox "Пример строки:" & "Это строка" |
3.1 Приоритет операций
Если выражение имеет несколько знаков операций, то их выполнение идет в следующем порядке: возведение в степень (Л) :
*, /, целочисленное деление (\), mod ; +,—;
Знак конкатенации (&) ; Операции сравнения; Логические операции Порядок вычислений можно изменить расстановкой скобок.
4 Использование встроенных функций VBA
Все функции VBA имеют один и тот же синтаксис:
Имя_функции([аргументы])
Имя функции должно подчинятся правилам именования объектов. Аргументы - это исходные данные, необходимые для работы функции. Функция всегда возвращает один единственный результат определенного типа.
Аргумент у функции может быть один, например,
Sin(3.5), IsNumeric(Str), ABS(X)
или аргументов может быть несколько, например,
1приШох("Вводи х", "Моя программа ", 8)
4.1 Функции ввода-вывода Функция InputBox
Используется для ввода данных в программу. Имеет следующий синтаксис:
liipiilllo\(/)raH(/)?(. title] [, default] f, xpos] [,ypos] [, lielpflle, context])
Отображает на рабочем листе Excel диалоговое окно с заголовком title и приглашением-подсказкой prompt и ожидает ввода данных пользователем с клавиатуры. Результат работы функции - данные, введенные пользователем.
Тип возвращаемого результата -siring.
Default - необязательный параметр, в котором можно указать значение по умолчанию, возвращаемое функцией InputBox, в случае, если пользователь ничего не ввел,
xpos, ypos - необязательный параметр, координаты верхнего левого угла диалогового окна. Оба расстояния измеряются в твилах: 1 твип равен 1/20точки (точка - единица измерения типа печати). 1 точка равна 1/72 дюйма.
helpfiie, context- испол: ^иются для обеспечения программы контекстно-зависимой справкой Helpfile - строковое выражение, которое содержит имя файла помощи в операционной системе Windows
Context - числовое выражение, которое определяет тематический раздел в файле помощи. Если вы хотите использовать аргументы helpfile, context необходимо установить компилятор Windows Help File. Пример:
Dim х As Integer
X= Clnt(lnputBox("BBeflHTe значение для x", "Ввод x", 5))
Т.к. функция InputBox возвращает результат строкового типа, а переменная х - типа Integer, то в выше приведенном примере используется функция явного преобразования типа.
С1пЦвыражение) - преобразует выражение к типу Integer; СОЫ(выражение)- преобразует выражение к типу Double; С1_пд(выражение) - преобразует выражение к типу Long; СВу1е(выражение) - преобразует выражение к типу Byte \/а!(выражение) преобразует строку в число, подходящего типа.
Использование этих функций желательно, но необязательно, т.к. VBA автоматически преобразует результат работы функции InputBox к типу переменной' (если может). Например, если с клавиатуры введена строка, преобразовать ее к типу Byte, например, не удастся и возникнет ошибка
S Всегда используйте функцию InputBox в составе оператора присваивания.
А = lnputBox("A =")
Синтаксис:
MsgBox(prompt[, buttons] [, title] [, lielpfile, context])
Отображает диалоговое окно с сообщением prompt и ожидает, пока пользователь щелкнет по какой-либо кнопке. Каждой кнопке ставится в соответствие целочисленная предопределенная константа. Результат работы функции - целое число, обозначающее номер нажатой пользователем кнопки.
Buttons - перечисляются кнопки, которые должны присутствовать в диалоговом окне. Например, константа vbOKOnly имеет значение 0 и выводит в диалоговом окне кнопку ОК; константа vbYesNoCancel имеет значение 3 и выводит в диалоговом окне кнопки ОК и Cancel; константа vbAbortRetrylgnore имеет значение 2 и выводит в диалоговом окне кнопки Abort, Retry, и Ignore. Полный перечень используемых функцией MsgBox констант можно увидеть в справке. Title - заголовок окна.
helpfile, context-используется так же как и в функции InputBox для обеспечения контекстно- зависимой справки. Например,
Dim К As integer
К = МэдВохСПродолжить работу?", vbYesNoCancel ."Мое сообщение") В результате выполнения этого оператора будет выведено следующее диалоговое окно:
Продолжить работ |
Р |
|
|
|
|
' Ь | |
Нет |
Отмена j |
|||
и в зависимости от номера нажатой кнопки (значения переменной К) выполнение программы пойдет тем или иным путем.
Если программисту неинтересно, какое значение возвращает функция MsgBox, то эту функцию можно использовать как процедуру, т.е. вне математического выражения и, не заключая аргументы в круглые скобки. Например,
MsgBox "Значение переменной " & К