Офисные задачи в Outlook 2002

         

Объектная модель VBA

Таблица 21.1. Описание объектов VBA



Объект

Тип

Описание

Collection

Объект из биб-

Упорядоченная совокупность объектов, с


лиотеки VBA

которой можно обращаться как с единым объектом

Debug

Объект

Позволяет выводить текущую информа-



цию в окно отладки непосредственно во



время выполнения кода на VBA

Dictionary

Объект из биб-

Объект, представляющий пару — ключ и


лиотеки Scripting

элемент. Является аналогом ассоциа-



тивной памяти

Drives

Семейство из

Содержит объекты Drive, предоставляю-


библиотеки

щие информацию (только для чтения) обо


Scripting

всех доступных дисках. Является свойст-



вом объекта FileSystemObject

Drive

Объект- из биб-

Предоставляет доступ к свойствам кон-


лиотеки Scripting

кретного локального или сетевого диска

Err

Объект из биб-

Предназначен для обработки ошибок


лиотеки VBA

Automation и ошибок модулей VBA во



время выполнения кода на VBA

Files

Семейство из

Содержит объекты класса File и пред-


библиотеки

ставляет совокупность всех файлов в


Scripting

данной папке. Является свойством объ-



екта FileSystemObject

File

Объект из биб-

Предоставляет доступ ко всем свойст-


лиотеки Scripting

вам файла на диске

FileSystemObject

Объект из биб-

Предоставляет доступ к файловой сис-


лиотеки Scripting

теме компьютера

Folders

Семейство из

Содержит объекты Folder и представ-


библиотеки

ляет совокупность всех папок внутри


Scripting

данной папки. Является свойством объекта Folder (свойство называется



SubFolders)

Folder

Объект из биб-

Предоставляет доступ ко всем свойст-


лиотеки Scripting

вам папки на диске

Объект

Тип

Описание

Texts tr earn

Объект из библиотеки Scripting

Обеспечивает последовательный доступ к текстовому файлу

UserForms

Семейство из библиотеки VBA

Содержит объекты Object, соответствующие объектам UserForm, и пред-



ставляет совокупность пользовательских форм, загруженных в данный момент в приложение. Это семейство является свойством объекта Global из библиотеки VBA

UserForm

Абстрактный объект VBA

Object

Представляет форму, являющуюся частью пользовательского интерфейса приложения. Характеристики этого объекта определяются пользователем

Продемонстрируем небольшой пример работы с рядом объектов VBA. Мы хотим вывести в окно Immediate посредством метода Print Объекта Debug

литеры, соответствующие логическим дискам компьютера. Для этого мы указали ссылку на объект, являющийся семейством Drives, после чего, воспользовавшись циклом For Each . .. Next, вывели требуемые значения посредством свойства DriveLetter объекта Drive.

Замечание

Цикл For Each . . . Next очень полезен при работе с семействами, поскольку не требуется знать количество объектов семейства и можно устраивать цикл по всей структуре. В противном случае необходимо было бы воспользоваться свойством count.

Программа 21.1. Использование объектов VBA

Sub ShowDriveList()

Set fsystem = CreateObject("Scripting.FileSystemObject")

Set systemDrives = fsystem.Drives

For Each d In systemDrives

Debug.Print d.DriveLetter

Next End Sub

Содержание раздела