Zwraca liczbę całkowitą wskazującą podtyp zmienna.
Składnia
VarType ( nazwa_zmiennej )
Wymagana nazwa_zmiennejargument jest wartością typu wariant zawierającą dowolną zmienną z wyjątkiem zmiennej zdefiniowanej przez użytkownika.
Zwracane wartości
Stała |
Value (Wartość) |
Opis |
vbEmpty |
0 |
puste (niezainicjowana) |
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 precyzji |
vbDouble |
5 |
Podwójna precyzja liczba zmiennoprzecinkowa |
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ślane przez język Visual Basic for Applications. Nazwy mogą być używane w dowolnym miejscu kodu w miejsce rzeczywistych wartości.
Uwagi
Funkcja VarType nigdy nie zwraca samej wartości dla vbArray . Zawsze jest dodawany do innej wartości, aby wskazać tablicę określonego typu. Stała vbVariant jest zwracana tylko w połączeniu z 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 + vbArray lub 8194. Jeśli obiekt ma domyślną 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.