Возвращает an an , 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 того, чтобы указать, что аргумент является 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.