Returnerer en Integer , der angiver undertypen af en variabel.
Syntaks
VarType(varname)
Det påkrævede varname argument er et Variant , der indeholder alle variabler undtagen en brugerdefineret type.
Returværdier
| Konstant | Værdi | Beskrivelse |
|---|---|---|
vbEmpty |
0 | Tom (ikke-initialiseret) |
vbNull |
1 | Null (ingen gyldige data) |
vbInteger |
2 | Heltal |
vbLong |
3 | Langt heltal |
vbSingle |
4 | Flydende tal med enkeltpræcision |
vbDouble |
5 | Dobbeltpræcision af flydende tal |
vbCurrency |
6 | Valutaværdi |
vbDate |
7 | Datoværdi |
vbString |
8 | Streng |
vbObject |
9 | Objekt |
vbError |
10 | Fejlværdi |
vbBoolean |
11 | Boolesk værdi |
vbVariant |
12 |
Variant (bruges kun med matrixer af varianter) |
vbDataObject |
13 | Et dataadgangsobjekt |
vbDecimal |
14 | Decimalværdi |
vbByte |
17 | Byteværdi |
vbUserDefinedType |
36 | Varianter, der indeholder brugerdefinerede typer |
vbArray |
8192 | Matrix |
Bemærk
Disse konstanter er defineret af Visual Basic for Applications (VBA). Du kan bruge navnene overalt i din kode i stedet for de faktiske værdier.
Bemærkninger
Funktionen VarType returnerer aldrig værdien for vbArray alene. Den føjer altid denne værdi til en anden værdi for at angive en matrix af en bestemt type.
Konstanten vbVariant returneres kun med vbArray for at angive, at argumentet til VarType er en matrix med Variant værdier. Den værdi, der returneres for en matrix med heltal er vbInteger + vbArrayf.eks. , eller 8194.
Hvis et objekt har en standardegenskab, VarType(object) returneres typen af objektets standardegenskab.
Eksempel
Bemærk
Følgende eksempler demonstrerer brugen af denne funktion i et VBA-modul (Visual Basic for Applications). Hvis du vil have mere at vide om at arbejde med VBA, skal du vælge Udviklerreference på rullelisten ud for Søg og skrive ét eller flere ord i søgefeltet.
I dette eksempel bruges funktionen VarType til at bestemme undertypen af en variabel.
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.