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