Zwraca podtyp Integer zmiennej.
Składnia
VarType(varname)
Wymaganym varname argumentem Variant jest to, który zawiera dowolną zmienną z wyjątkiem typu zdefiniowanego przez użytkownika.
Wartości zwracane
| 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 precyzji |
vbDouble |
5 | Liczba zmiennoprzecinkowa o podwójnej precyzji |
vbCurrency |
6 | Wartość waluty |
vbDate |
7 | Wartość daty |
vbString |
8 | Ciąg |
vbObject |
9 | Obiekt |
vbError |
10 | Wartość błędu |
vbBoolean |
11 | Wartość logiczna |
vbVariant |
12 |
Variant (używane tylko z tablicami wariantów) |
vbDataObject |
13 | Obiekt dostępu do danych |
vbDecimal |
14 | Wartość dziesiętna |
vbByte |
17 | Wartość bajtowa |
vbUserDefinedType |
36 | Warianty zawierające typy zdefiniowane przez użytkownika |
vbArray |
8192 | Tablica |
Uwaga
Te stałe są definiowane przez język Visual Basic for Applications (VBA). Możesz użyć nazw w dowolnym miejscu kodu zamiast rzeczywistych wartości.
Spostrzeżenia
Funkcja VarType sama w sobie nigdy nie zwraca wartości vbArray . Zawsze dodaje tę wartość do innej wartości, aby wskazać tablicę określonego typu.
Stała vbVariant jest zwracana tylko w vbArray celu wskazania, że argument jest VarType tablicą Variant wartości. Na przykład wartością zwróconą dla tablicy liczb całkowitych jest vbInteger + vbArray, lub 8194.
Jeśli obiekt ma właściwość domyślną, VarType(object) 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 tej VarType funkcji 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.