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


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



Инструкция 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









Начало  Назад  Вперед


Книжный магазин