Повертає ціле число, яке вказує підтип змінна.
Синтаксис
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 = 459 StrVar = "Hello World" DateVar = #2/12/69# MyCheck = VarType(IntVar) ' Returns 2. MyCheck = VarType(DateVar) ' Returns 7. MyCheck = VarType(StrVar) ' Returns 8.