Модули класса автоматически включают события инициализации и завершения. Для использования данных событий необходимо выбрать событие в поле со списком в верхней части окна кода.
Событие инициализации вызывается при создании объекта. Например, если нужно, чтобы выполнялся определенный код при создании объекта cUser, данный код можно поместить в событие Initialize.
Событие завершения происходит при разрушении объекта. Здесь удобно записывать код очистки, выполняющийся при закрытии подключений к базам данных, освобождении объектных переменных и т.д.
Использование объектов
На данном этапе существует объект cUser со своими свойствами и методами. Чтобы использовать его в модуле класса, достаточно ввести имя объекта и добавить в конце точку. IntelliSense отобразит список свойств и методов объекта.
Для использования объекта в классе, который создает объект, употребляется ключевое слово Me. Например, чтобы присвоить имя пользователя, необходимо ввести:
Me.User = "Steve"
Использование объекта вне модуля класса cUser (в формах либо стандартных модулях) разбивается на два этапа. Во-первых, необходимо определить объектную переменную для использования в качестве ссылки на объект. Во-вторых, используется ключевое слово Set для создания ссылки из объектной переменной
|
|
на объект.
Создание объектной переменной
Переменная — это участок памяти, отведенный для хранения или использующийся при считывании информации. Вне всяких сомнений, у разработчиков имеется громадный опыт работы с простыми переменными, такими как строковые и целочисленные переменные. Ниже приведены примеры объявления и использования двух простых переменных:
Dim sfcrNaor aa String
Dim I as integer
strNama = "James"
I = 10
В этих примерах переменные включают специфический тип данных, и информация может храниться и считываться по необходимости.
Переменная Object объявляется с помощью выражения Dim, как и простые переменные:
Dim objUser as cUser
Присваивание объектной переменной объекту
Для установки ссылки объектной переменной на объект используется ключевое слово Set. Например:
Set objUser = New cUser
ПРЕДОСТЕРЕЖЕНИЕ
Рекомендуется всегда объявлять операторы Dim и Set в отдельных строках. Не следует комбинировать данные операторы в одной строке, как, например, Dim objUser = New cUser. При этом код выполняется медленнее и момент и, образования объекта (записи в память) определить невозможно.