Возвращает объект Integer , указывающий подтип переменной.
Синтаксис
VarType(varname)
Обязательный 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 для приложений (VBA). Имена можно использовать в любом месте кода вместо фактических значений.
Замечания
Функция VarType никогда не возвращает значение для vbArray самостоятельно. Он всегда добавляет это значение в другое значение, чтобы указать массив определенного типа.
Константы vbVariant возвращаются только с vbArray , чтобы указать, что аргумент to 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.