Возвращает целое число, указывающее подтип переменной.
Синтаксис
VarType(варнаме)
Обязательный аргумент varname — это variant, содержащий любую переменную, кроме переменной определяемого пользователемтипа.
Возвращаемые значения
| Константа | Значение | Описание |
|---|---|---|
| vbEmpty | 0 | Пустой (неинициализированный) |
| vbNull | 1 | NULL (нет допустимых данных) |
| vbInteger | 2 | Тип Integer (целое) |
| vbLong | 3 | Тип Long Integer (длинное целое) |
| vbSingle | 4 | Тип Single (одинарной точности с плавающей запятой) |
| vbDouble | 5 | Тип Double (двойной точности с плавающей запятой) |
| vbCurrency | 6 | Тип Currency (денежный) |
| vbDate | 7 | Тип Date (значение даты и времени) |
| vbString | 8 | Тип String (строка) |
| vbObject | 9 | Тип Object (объект) |
| vbError | 10 | Значение ошибки |
| vbBoolean | 11 | Тип Boolean (логическое значение) |
| vbVariant | 12 | Variant (используется только с массивами переменных) |
| vbDataObject | 13 | Тип DataObject (объект доступа к данным) |
| vbDecimal | 14 | Тип Decimal (десятичное значение) |
| vbByte | 17 | Тип Byte (байтовое значение) |
| vbUserDefinedType | 36 | Тип Variant, содержащий определенный пользователем тип |
| vbArray | 8192 | Массив |
Примечание
Эти константы задаются Visual Basic для приложений. Имена можно использовать в любом месте кода вместо фактических значений.
Замечания
Функция VarType никогда не возвращает значение vbArray само по себе. Оно всегда добавляется к другому значению, обозначающему тип массива. Константа vbVariant возвращается только в сочетании с vbArray, чтобы показать, что аргументом функции VarType был массив типа Variant. Например, значение, возвращаемое для массива целых чисел, вычисляется как vbInteger + vbArray или 8194. Если объект имеет свойство по умолчанию, VarType(object) возвращает тип свойства объекта по умолчанию.
Пример
Примечание
В примерах ниже показано, как использовать эту функцию в модуле Visual Basic для приложений (VBA). Чтобы получить дополнительные сведения о работе с VBA, выберите Справочник разработчика в раскрывающемся списке рядом с полем Поиск и введите одно или несколько слов в поле поиска.
В этом примере функция VarType используется для определения подтипа переменной.
Dim IntVar, StrVar, DateVar, MyCheck
' Initialize variables.
IntVar = 459
StrVar = "Hello World"
DateVar = #2/12/69#
MyCheck = VarType(IntVar) ' Returns 2.
MyCheck = VarType(DateVar) ' Returns 7.
MyCheck = VarType(StrVar) ' Returns 8.