Самоучитель VBA

       

Инструкция DefТип


Инструкция DefTиn (вместо тип в имени инструкции фигурируют буквы, обозначающие конкретный тип данных) используется на уровне модуля для задания типа данных по умолчанию для переменных, аргументов, передаваемых в процедуры, и значений, возвращаемых процедурами Function и Property Get, имена которых начинаются с соответствующих символов.

Синтаксис:

DefBool ДиапазонБукв [ , ДиапазонБукв] ...



Тип данных Boolean

DefByte ДиапазонБукв!, ДиапазонБукв] ...

Тип данных Byte

Deflnt ДиапазонБукв [ , ДиапазонБукв] ...

Тип данных Integer

DefLng ДиапазонБукв!, ДиапазонБукв] ...

Тип данных Long

DefCur ДиапазонБукв [, ДиапазонБукв] ...

Тип данных Currency

DefSng ДиапазонБукв [, ДиапазонБукв] ...

Тип данных Single

DefDbl ДиапазонБукв [, ДиапазонБукв] ...

Тип данных Double

DefDate ДиапазонБукв [, ДиапазонБукв] ...

Тип данных Date

DefStr ДиапазонБукв [, ДиапазонБукв] ...

Тип данных String

DefObj ДиапазонБукв [, ДиапазонБукв] ...

Тип данных Оbject

DefVar ДиапазонБукв [, ДиапазонБукв] ...

Тип данных Variant

Аргумент ДиапазонБукв имеет следующий синтаксис:

Буква1[-Буква2]

Аргументы Буква1 и Буква2 указывают границы диапазона имен, для которых задается тип данных по умолчанию.

В следующем примере инструкция устанавливает, что все переменные с именами, начинающимися с букв из диапазона от А до Q, имеют строковый тип:

DefStr A-Q

Инструкция Def Тип действует только на модуль, в котором она используется.

При указании диапазона букв обычно определяется тип данных по умолчанию для переменных, которые начинаются с первых 128 символов набора. Однако при указании диапазона A—Z задается тип данных по умолчанию для всех переменных, включая те, что начинаются с международных символов из расширенной части набора (128-255).

Еще одним способом задания типа переменной по умолчанию является включение в конец имени специального символа, устанавливающего тип переменной.
Допустимо использование следующих специальных символов для установки типов.



*



Integer



&



Long



|



Single



#



Double



@



Currency



$



String






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