Zwraca liczbę całkowitą wskazującą podtyp zmienna.
Składnia
VarType (nazwa_var)
Wymagana nazwa_zmiennejargument wariantem zawierającym dowolną zmienną z wyjątkiem zmiennej typu zdefiniowanego przez użytkownika.
Zwracane wartości
Stała |
Wartość |
Opis |
vbEmpty |
0 |
puste (niezainicjowane) |
vbNull |
1 |
Null (brak prawidłowych danych) |
vbInteger |
2 |
Liczba całkowita |
vbLong |
3 |
Liczba całkowita długa |
vbSingle |
4 |
Liczba zmiennoprzecinkowa o pojedynczej dokładności |
vbDouble |
5 |
Liczba zmiennoprzecinkowa o podwójnej dokładności |
vbCurrency |
6 |
Wartość walutowa |
vbDate |
7 |
Wartość daty |
vbString |
8 |
Ciąg |
vbObject |
9 |
Obiekt |
vbError |
10 |
Wartość błędu |
vbBoolean |
11 |
Wartość logiczna |
vbVariant |
12 |
Wariant (używany tylko z tablicami wariantów) |
vbDataObject |
13 |
Obiekt dostępu do danych |
vbDecimal |
14 |
Wartość dziesiętna |
vbByte |
17 |
Wartość bajtu |
vbUserDefinedType |
36 |
Warianty zawierające typy zdefiniowane przez użytkownika |
vbArray |
8192 |
Tablica |
Uwaga: Te stałe są określone w języku Visual Basic for Applications. Nazw można używać w dowolnym miejscu kodu w miejscu wartości rzeczywistych.
Spostrzeżenia
Funkcja VarType nigdy nie zwraca samej wartości dla funkcji vbArray. Jest on zawsze dodawany do innej wartości, aby wskazać tablicę określonego typu. Stała vbVariant jest zwracana tylko w połączeniu z funkcją vbArray, aby wskazać, że argument funkcji VarType jest tablicą typu Wariant. Na przykład wartość zwrócona dla tablicy liczb całkowitych jest obliczana jako vbInteger + vbArraylub 8194. Jeśli obiekt ma domyślny właściwość, funkcja VarType(obiekt) zwraca typ właściwości domyślnej obiektu.
Przykład
Uwaga: Poniższe przykłady przedstawiają sposób użycia tej funkcji w module języka Visual Basic for Applications (VBA). Aby uzyskać dodatkowe informacje na temat pracy w języku VBA, wybierz pozycję Dokumentacja dewelopera z listy rozwijanej obok przycisku Wyszukaj i wprowadź odpowiednie terminy w polu wyszukiwania.
W tym przykładzie użyto funkcji VarType do określenia podtypu zmiennej.
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.