Пользовательские типы данных

Помимо стандартных типов язык VBA позволяет создавать пользовательские типы данных. Для создания пользовательского типа предназначена инструкция Type. Инструкция имеет следующий формат:

Type <Имя типа данных>
    <Имя переменной1> [As <Тип>]
    [...
    <Имя переменнойN> [As <Тип>]]
End Type

В качестве примера объявим новый тип Книга, который будет содержать информацию о книге:

Type Книга
   Название As String
   Автор As String
   Издательство As String
   Год As Integer
   КоличествоСтраниц As Integer
End Type

Это объявление следует поместить в самом начале модуля. Размещать объявление внутри процедуры или функции нельзя. После создания пользовательского типа его название можно использовать при объявлении переменной в операторе Dim:

Dim book As Книга

После объявления переменной можно получить доступ к отдельным элементам, используя точечную нотацию:

book.Название = "Python. Самое необходимое"
book.Автор = "Прохоренок Н.А."
book.Издательство = "БХВ-Петербург"
book.Год = 2010
book.КоличествоСтраниц = 416

Инструкция With позволяет сократить объем кода:

With book
   .Название = "Python. Самое необходимое"
   .Автор = "Прохоренок Н.А."
   .Издательство = "БХВ-Петербург"
   .Год = 2010
   .КоличествоСтраниц = 416
End With
Предыдущая статья Все статьи Следующая статья