Повертає ціле число, яке вказує підтип змінна.
Синтаксис
VarType ( ім'я_varname )
Обов'язкове ім'я varnameаргумент – це варіант, який містить будь-яку змінну, крім змінної визначеного користувачем типу.
Значення, що повертаються
|
Константа |
Значення |
Опис |
|
vbEmpty |
0 |
Порожній (неініціалізовані) |
|
vbNull |
1 |
Null-значення (немає припустимих даних) |
|
vbInteger |
2 |
Ціле число |
|
vbLong |
3 |
Довге ціле число |
|
vbSingle |
4 |
Одноточне число з рухомою комою |
|
vbDouble |
5 |
Число з подвійною точністю з рухомою комою |
|
vbCurrency |
6 |
Значення грошової одиниці |
|
Дата vbDate |
7 |
Значення дати |
|
Рядок vb |
8 |
Рядок |
|
об'єкт vbObject |
9 |
Object |
|
vbError |
10 |
Значення помилки |
|
vbBoolean |
11 |
Логічне значення |
|
vbVariant |
12 |
Variant (використовується лише з масивами варіантів) |
|
об'єкт vbDataObject |
13 |
Об'єкт доступу до даних |
|
vbDecimal |
14 |
Десяткове значення |
|
vbByte |
17 |
Значення "Байт" |
|
Тип vbUserDefinedType |
36 |
Варіанти, які містять користувацькі типи |
|
vbArray |
8192 |
Масив |
Примітка.: Ці константи визначено в модулі Visual Basic for Applications. Імена можна використовувати будь-де в коді замість фактичних значень.
Примітки
Функція VarType ніколи не повертає значення для vbArray окремо. Він завжди додається до іншого значення, щоб позначити масив певного типу. Константа vbVariant повертається лише в поєднанні з vbArray , щоб указати, що аргумент функції VarType є масивом типу Variant. Наприклад, значення, повернуте для масиву цілих значень, обчислюється як vbInteger + vbArray або 8194. Якщо об'єкт має стандартну властивість, Функція VarType(об'єкт) повертає тип властивості об'єкта за замовчуванням.
Приклад
Примітка.: У прикладах нижче показано використання цієї функції в модулі Visual Basic for Applications (VBA). Щоб отримати докладні відомості про використання модуля VBA, клацніть пункт Довідник розробника в розкривному списку поряд із полем Пошук і введіть у поле пошуку принаймні один термін.
У цьому прикладі функцію VarType використано для визначення підтипу змінної.
Dim IntVar, StrVar, DateVar, MyCheck' Initialize variables.IntVar = 459StrVar = "Hello World"DateVar = #2/12/69# MyCheck = VarType(IntVar) ' Returns 2.MyCheck = VarType(DateVar) ' Returns 7.MyCheck = VarType(StrVar) ' Returns 8.
