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 = 459StrVar = "Hello World"DateVar = #2/12/69# MyCheck = VarType(IntVar)    ' Returns 2.MyCheck = VarType(DateVar)   ' Returns 7.MyCheck = VarType(StrVar)    ' Returns 8.

Potrzebujesz dalszej pomocy?

Chcesz uzyskać więcej opcji?

Poznaj korzyści z subskrypcji, przeglądaj kursy szkoleniowe, dowiedz się, jak zabezpieczyć urządzenie i nie tylko.

Społeczności pomagają zadawać i odpowiadać na pytania, przekazywać opinie i słuchać ekspertów z bogatą wiedzą.