43.Инструкция dim. Примеры

Инструкция Dim предназначена для описания типа данных переменной на уровне модуля или процедуры. Например, следующая инструкция описывает переменную с типом Integer.

Dim NumberOfEmployees As Integer

Инструкция Dim предназначена также для описания объектного типа переменных. Далее приводится описание переменной для нового образца листа электронной таблицы.

Dim X As New Worksheet

Если при описании объектной переменной не используется ключевое слово New, то для использования объекта, на который ссылается переменная, существующий объект должен быть с помощью инструкции Set присвоен переменной. До присвоения объекта описанная объектная переменная имеет специальное значение Nothing, которое указывает, что она не содержит ссылку на какой-либо определенный экземпляр объекта.

Имеется также возможность применять инструкцию Dim с пустыми скобками для описания динамического массива. После описания динамического массива, воспользуйтесь инструкцией ReDim в процедуре для определения числа размерностей и элементов массива. При попытке переопределить размерности переменной-массива, чей размер был явно указан в инструкции Private, Public или Dim , возникает ошибка.

Если тип данных или тип объекта не задан, и в модуле отсутствует инструкция DefТип, по умолчанию переменная получает тип Variant.

При инициализации переменных числовая переменная получает значение 0, строка переменной длины получает значение пустой строки (""), а строка фиксированной длины заполняется нулями. Переменные типа Variant получают при инициализации значение Empty. Каждый элемент переменной определяемого пользователем типа при инициализации получает значение, которые он получил бы, если бы являлся отдельной переменной.

При использовании инструкции Dim в процедуре ее обычно помещают в начало процедуры.

Ниже приводится пример описания процедуры с массивом параметров.

Sub AnyNumberArgs(strName As String, ParamArray intScores() As Variant)

Dim intI As Integer

Debug.Print strName; " Scores"

' Использует функцию UBound для определения верхней границы массива.

For intI = 0 To UBound(intScores())

Debug.Print " "; intScores(intI)

Next intI

End Sub

44.Описания переменных в языке vba. Примеры

Переменные VBA аналогичны переменным других языков программирования. Объекты, с которыми работают процедуры и функции VBA , представляют собой средство программного управления приложениями Office 2000 и созданными с их помощью документами. Как и в других объектно-ориентированных языках программирования, у объектов VBA имеются свойства, которые могут принимать различные значения. Эти значения можно использовать в инструкциях VBA в качестве переменных .

Иерархия как общих объектов Office 2000, так и отдельных приложений описывается объектными моделями. Объектная модель описывает вложенность классов объектов, свойства, имеющиеся у объектов каждого из классов, а также методы — операции, с помощью которых можно менять значения этих свойств. Более подробно объектные модели описываются в справочной системе по программированию на языке VBA и специальных изданиях, посвященных разработке приложений в рамках Office 2000.

Использованию переменной обычно предшествует ее объявление — инструкция Dim, в которой указывается как имя переменной, так и тип данных, для хранения которых она предназначена. Хотя такая инструкция и не обязательна ( VBA может определять тип данных переменной по последнему символу ее имени: ! # $ % & @), тем не менее хороший стиль программирования требует предварительного описания всех используемых переменных. Имена переменных могут иметь длину до 255 символов (в том числе — символов кириллицы), и не должны содержать пробелов, знаков препинания и перечисленных выше специальных символов (за исключением последнего знака). Они не могут также совпадать с ключевыми словами VBA и именами стандартных объектов.

Чтобы выбранное имя переменной случайно не совпало с ключевым словом или названием стандартного объекта, достаточно всегда начинать имена переменных со строчной буквы (первые символы ключевых слов и имена стандартных объектов автоматически преобразуются системой программирования VBA в прописные).

Описание переменных

Dim a, b As Integer

Dim дата_рождения As Date

Dim Фамилия As String, Имя As String * 25

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

Boolean — логические переменные, принимающие одно из двух значений: ИСТИНА или ЛОЖЬ;

Byte — целое число в диапазоне от 0 до 255;

Currency — переменные для денежных вычислений с фиксированным количеством разрядов после десятичной запятой; позволяют избежать накопления погрешностей округления;

Date — переменные для хранения даты и времени;

Object — переменные для хранения ссылок на объекты (об объектных переменных см. далее в этом разделе); и д.р.

Описания переменных

Sub FIOL(фамилия As String, имя As String, длина_строки As Integer)

длина_строки = Len(фамилия) + Len(имя) + 1

End Sub

Function FIOLen(фамилия As String, имя As String) As Integer

FIOLen = Len(фамилия) + Len(имя) + 1

End Function

В программах на VBA часто встречаются переменные , содержащие ссылку на объект — объектные переменные. Их применение позволяет удобнее организовать работу с различными объектами. Для задания значения объектной переменной (назначения ссылки на объект) используется инструкция Set. Применение объектных переменных совместно с парой инструкций With имя объектной переменной…End With позволяет выполнить несколько операций с одним объектом без его повторного поиска. В листинге 14.5 приведен пример процедуры, выполняющей с первой ячейкой выделенной области рабочего листа Excel следующие действия: увеличивает хранящееся в ней значение на единицу; увеличивает кегль на два пункта; изменяет на противоположный режим курсива (если значение выводилось курсивом, то будет выведено прямым шрифтом, и наоборот).