Returnerer en Integer , der angiver undertypen for en variabel.
Syntaks
VarType(varname)
Det påkrævede varname argument er en Variant , der indeholder en variabel 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 med 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 defineres af Visual Basic for Applications (VBA). Du kan bruge navnene et vilkårligt sted i din kode i stedet for de faktiske værdier.
Bemærkninger
Funktionen VarType returnerer aldrig værdien for vbArray sig selv. 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, 8194er vbInteger + vbArrayf.eks.
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 for 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.