Returnerer et heltal, der angiver undertypen for en variabel.

Syntaks

VarType ( varname )

Det påkrævede variabelnavnargument en variant, der indeholder alle variabler undtagen en variabel af 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

Flydende tal med dobbeltpræcision

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 angivet af Visual Basic for Applications. Navnene kan bruges hvor som helst i din kode i stedet for de faktiske værdier.

Bemærkninger

Funktionen VarType returnerer aldrig værdien for vbArray alene. Det føjes altid til en anden værdi for at angive en matrix af en bestemt type. Konstanten vbVariant returneres kun sammen med vbArray for at angive, at argumentet for funktionen VarType er en matrix af typen Variant. Den værdi, der returneres for en matrix med heltal, beregnes f.eks. som vbInteger + vbArrayeller 8194. Hvis et objekt har egenskab, returnerer VarType(objekt) 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.

Har du brug for mere hjælp?

Udvid dine færdigheder
Gå på opdagelse i kurser
Få nye funktioner først
Deltag i Microsoft insiders

Var disse oplysninger nyttige?

Hvor tilfreds er du med kvaliteten af oversættelsen?

Hvad påvirkede din oplevelse?

Har du mere feedback? (Valgfrit)

Tak for din feedback!

×