Тема 2.5 Синтаксис VBA

Алфавит VBA

Алфавит языка программирования - это полный набор допустимых символов, принятых в конкретном языке для обозначения данных и действий над ними.

Алфавит языка VBA включает следующий набор символов:

• прописные (A - Z) и строчные (а - z) буквы латинского алфавита;
• цифры от 0 до 9;
• машинописные символы и знаки пунктуации: !, @, #, $, %, &;
• знаки арифметических операций (в порядке возрастания приоритета): +, -, *, /, |, ^;
• знаки операций отношения: =, <, >;
• знаки препинания и разделители: <пробел>, <перевод строки>, _ . : ; ( );
• ' - апостроф в качестве символа комментария.

В алфавит языка входят также зарезервированные слова, которые не могут быть использованы в качестве идентификаторов. Примеры зарезервированных слов: Dim, Sub, Function, If и т.д.

Типы данных

Тип данных определяет диапазон возможных значений переменной, количество памяти для ее размещения и набор допустимых операций. Базовые типы данных VBA приведены в таб. 5.

Таблица 5. Типы данных VBA

Идентификаторы

В качестве идентификатора в VBA можно использовать произвольную последовательность букв и цифр длиной до 255 символов, которая обязательно должна начинаться с буквы. Эта последовательность может включать также символы подчеркивания и цифр. В качестве идентификаторов нельзя использовать зарезервированные слова языка и имена библиотечных объектов. Пробелы в идентификаторах недопустимы.

Примеры идентификаторов: SalesHistory, Counter, i, BirthDay и т.п.

Объявления

Переменные

VBA поддерживает 2 способа объявления переменных:

1. Неявный - VBA создает переменную и резервирует память для ее хранения, когда эта переменная в первый раз появляется в каком-либо операторе VBA (обычно в операторе присваивания).
2. Явный - имя и тип переменной определяются до первого обращения.

Явное объявление переменных предпочтительнее, так как:

• ускоряет выполнение кода;
• уменьшается количество ошибок;
• код становится более понятным.

Для явного объявления переменных используется оператор Dim со следующим синтаксисом:

Dim <имяПеременной> [As <типДанных>] 

Здесь:

имяПеременной - любой допустимый идентификатор;

типДанных - любой поддерживаемый VBA тип данных.

Для принудительного включения явного и обязательного объявления переменных используется оператор Option Explicit.Он должен быть расположен в самом начале модуля (раздел Declarations). При неявном объявлении переменной можно задавать ее тип, добавляя в конец имени специальные символы определения типа (type definition character). Эта возможность сохранена для совместимости с устаревшими версиями языка Basic.

Константы

VBA поддерживает неименованные и именованные константы. Неименованные константы — это фактические значения данных определенного типа. Их можно использовать без какого-либо объявления, непосредственно в выражениях.

Именованные константы — это мнемонические обозначения неименованных констант. Для использования в программе именованные константы должны быть предварительно объявлены с ключевым словом Const.

Синтакис объявления именованных констант:

Const <имяКонстанты> [As <типДанных>] = <значение1> 

Где:

имяКонстанты – имя константы;

значение – значение константы.

Пример:

Const intPersonCount As Integer = 100
Const maxLen% = 50

Библиотеки типов VBA представляют множество встроенных констант. Такие константы используются обычно при работе с объектами приложения. Эти константы не требуют предварительного описания. Имена встроенных констант начинаются с префикса, который указывает, к объекту какого приложения Microsoft Office они относятся: xl(Excel), wd(Word), ac(Access), pp(Power Point), ol(Outlook), vb(VBA).

Операции

В программах на VBA можно использовать весь типовой для универсального языка программирования набор операций:

• математические (или арифметические) – выполняются над числами и их результатом являются числа;
• отношения – применяются не только к числам и их результатом являются логические значения;
• логические – используются в логических выражениях и их результатом являются логические значения.

Таблица 6. Математические операции

Таблица 7. Операции отношения

Таблица 8. Логические операции

Таблица 9. Операции над строками

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

Оператор присваивания предназначен для задания ("присваивания") значения переменным, инициализации констант или изменения свойств объекта. Формат оператора присваивания:

[Let] <имяЭлемента> = <выражение> 

где:

Let - необязательная инструкция, которая сохранена для совместимости;

<имяЭлемента> – это идентификатор переменной, константы (при объявлении) или свойства объекта;

<выражение> состоит из переменных, констант, операций и функций.

Примеры использования оператора присваивания:

Place="d:\windows\system"
File="GameTree.Exe"
Student_Card(100).Group=33 

Для присваивания переменной ссылки на объект применяется инструкция Set:

Set <объектная Переменная> = [New] <объектноеВыражение> | Nothing 

где:

New – опция (ключевое слово), которая используется при создании нового экземпляра класса;

Nothing – опция (ключевое слово), которая позволяет освободить все системные ресурсы и ресурсы памяти, выделенные для объекта.

В следующем примере инструкция Set присваивает переменной MyRange ссылку на диапазон ячеек А1:В1.

Set MyRange = Range("A1:B1") 

Приоритеты операций

Порядок выполнения операций определяется расстановкой круглых скобок и приоритетом (старшинством) операций. Это обеспечивает однозначность в трактовании значений выражений. В таб. 10 приведены приоритеты выполнения операций.

Таблица 10. Приоритеты операции VBA

Для иллюстрации вышесказанного приведем пример программы, вычисляющей диаметр, периметр и площадь круга, заданного радиусом (листинг 2).

Листинг 2. Переменные, константы, операции

Private R As Single 'радиус
Public D As Single, S As Single, P As Single 'диаметр, периметр, площадь
Const PI = 3.14 'Константа PI (имеется встроенная функция VBA)
Sub sample2()
Dim res As String
R = 20
D = 2 * R 'вычисляем диаметр
S = PI * R ^ 2 'вычисляем площадь
P = D * PI 'вычисляем периметр
'формируем строку сообщения
res = "Для окружности с радиусом " & CStr(R) & " диаметр равен " & CStr(D) &
_ ", периметр - " & CStr(P) & ", площадь - " & CStr(S)
Debug.Print res ' вывод результата в окно отладчика
End Sub 

CC-BY-CA Анатольев А.Г., 31.01.2012