Returnerar an som anger undertypen av en Integer variabel.
Syntax
VarType(varname)
Det obligatoriska varname argumentet är a Variant som innehåller vilken variabel som helst utom en användardefinierad typ.
Returvärden
| Konstant | Värde | Beskrivning |
|---|---|---|
vbEmpty |
0 | Tom (oinitierad) |
vbNull |
1 | Null (inga giltiga data) |
vbInteger |
2 | Heltal |
vbLong |
3 | Långt heltal |
vbSingle |
4 | Flyttalsnummer med enkel precision |
vbDouble |
5 | Flyttalstal med dubbel precision |
vbCurrency |
6 | Valutavärde |
vbDate |
7 | Datumvärde |
vbString |
8 | Sträng |
vbObject |
9 | Objekt |
vbError |
10 | Ett felvärde |
vbBoolean |
11 | Booleskt värde |
vbVariant |
1,2 |
Variant (används endast med matriser med varianter) |
vbDataObject |
1, 3 | Ett dataåtkomstobjekt |
vbDecimal |
14 | Decimalvärde |
vbByte |
17 | Bytevärde |
vbUserDefinedType |
36 | Varianter som innehåller användardefinierade typer |
vbArray |
8192 | Matris |
Obs
Konstanterna definieras av Visual Basic for Applications (VBA). Du kan använda namnen var som helst i koden i stället för de faktiska värdena.
Kommentarer
Funktionen VarType returnerar aldrig värdet för vbArray för sig själv. Det lägger alltid till det värdet till ett annat värde för att ange en matris av en viss typ.
Konstanten vbVariant returneras endast med vbArray för att ange att argumentet till VarType är en matris med Variant värden. Värdet som returneras för en matris med heltal är vbInteger + vbArraytill exempel , eller 8194.
Om ett objekt har en standardegenskap VarType(object) returneras typen av objektets standardegenskap.
Exempel
Obs
I exemplen nedan visar vi hur du använder den här funktionen i en Visual Basic for Applications-modul (VBA). Om du vill läsa mer om hur man använder VBA, kan du välja Info för utvecklare i listrutan bredvid Sök och sedan skriva en eller flera söktermer i sökrutan.
I det här exemplet används funktionen VarType för att fastställa undertypen av 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.