VarType
Функция VarType
VarType (VarName)
Функция служит для определения кодового обозначения типа данных переменной или свойства объекта
Возвращаемое значение
Возвращает значение типа Integer, указывающее подтип переменной
Параметры
- VarName
- Обязательный параметр, являющий значением типа Variant, содержащим любую переменную
Возвращаемые значения
Константа |
Значение |
Описание |
vbEmpty |
0 |
Значение Empty (не инициализированная переменная) |
vbNull |
1 |
Значение Null (действительные данные отсутствуют) |
vbInteger |
2 |
Значение типа Integer |
vbLong |
3 |
Значение типа Long integer |
vbSingle |
4 |
С плавающей точкой обычной точности |
vbDouble |
5 |
С плавающей точкой двойной точности |
vbCurrency |
6 |
Значение типа Currency |
vbDate |
7 |
Значение типа Date |
vbString |
8 |
Значение типа String |
vbObject |
9 |
Объект |
vbError |
10 |
Значение ошибки |
vbBoolean |
11 |
Значение типа Boolean |
vbVariant |
12 |
Значение типа Variant (используется только с массивами значений типа Variant) |
vbDataObject |
13 |
Объект доступа к данным |
vbDecimal |
14 |
Значение типа Decimal |
vbByte |
17 |
Значение типа Byte |
vbUserDefinedType |
36 |
Значения типа Variant, содержащие типы, определенные пользователем |
vbArray |
8192 |
Массив |
Примечания
Функция VarTypeникогда не возвращает значение vbArray само по себе. Эта константа всегда складывается с каким-либо другим значением, указывающим тип массива. Константа vbVariantвозвращается только в сочетании с константой vbArray, чтобы показать, что в параметре функции VarType указан массив типа Variant. Например, значение возвращенное для массива целых чисел вычисляется как vbInteger + vbArray, или равняется 8194. Если объект имеет свойство,установленное по умолчанию, то функция VarType(Object) возвращает тип этого свойства объекта
Пример
' В данном примере функция VarType
' используется для проверки подтипа переменной
Dim IntVar, StrVar, DateVar, retval
' Инициализируем переменные
IntVar = 459 'число типа Integer
StrVar = "Русский_Проект" 'строка
DateVar = #7/27/66# 'дата
retval = VarType(IntVar)
Print retval
retval = VarType(DateVar)
Print retval
retval = VarType(StrVar)
Print retval
Категория
Функции преобразования чисел в разные системы счисления
|