Для работы с множеством объектов, предоставляемых Visual Basic и другими библиотеками, необходимо воспользоваться объектными переменными.
Объектной переменной называется переменная, которая ссылается на объект. Вы можете устанавливать или возвращать свойства или использовать методы этого объекта.
Чтобы создать объектную переменную:
1. Объявите объектную переменную 2. Свяжите переменную с самим объектом
» Объявление объектных переменных
Используйте оператор Dim или другие операторы объявления (Public, Private, Static), чтобы объявить объектную переменную. Переменная, которая ссылается на объект должна быть Variant, Object или указанным типом объекта. Например, следующие примеры объявления правильные:
Dim MyObject 'Variant Dim MyObject As Object 'Object Dim MyObject As Font 'Font - тип объекта
А если тип объекта заранее не известен, то воспользуйтесь функцией CreateObject:
Set MyObject = CreateObject("Excel.Sheet")
» Связь перменной с объектом
Для установки переменной определённого объекта используйте оператор Set. Переменной вы также можете установить значение Nothing, тем самым освободить занимаемые ею ресурсы:
Set MyObject = Font Set MyObject = Nothing
Вы также можете добавить к строке связи переменной ключевое слово New, чтобы создать новый экземпляр объекта:
Set MyObject = New Object
Объекты также можно передавать в качестве параметров процедурам или функциям:
Sub SetBackColor(pObject as Object) pObject.BackColor = vbRed End Sub
Чтобы изменить цвет фона текущей формы, передайте процедуре объект Me, который и предстовляет эту форму.