Egy változó altípusát jelző egész számot ad vissza.
Szintaxis
VarType(varname)
A kötelező varnameargumentum egy Variant, amely a felhasználó által megadott típusú változók kivételével bármilyen változót tartalmaz.
Visszatérési értékek
| Állandó | Érték | Leírás: |
|---|---|---|
| vbEmpty | 0 | Üres (nem inicializált) |
| vbNull | 1 | Null (nincs érvényes adat) |
| vbInteger | 2 | Egész |
| vbLong | 3 | Hosszú egész szám |
| vbSingle | 4 | Egypontos lebegőpontos szám |
| vbDouble | 5 | Dupla pontosságú lebegőpontos szám |
| vbCurrency | 6 | Pénznemérték |
| vbDate | 7 | Dátumérték |
| vbString | 8 | String |
| vbObject | 9 | Objektum |
| vbError | 10 | Hibaérték |
| vbBoolean | 11 | Logikai érték |
| vbVariant | 12 | Variant (csak variánstömbökkel használható) |
| vbDataObject | 13 | Adatelérési objektum |
| vbDecimal | 14 | Decimális érték |
| vbByte | 17 | Bájtérték |
| vbUserDefinedType | 36 | Felhasználó által definiált típusokat tartalmazó változatok |
| vbArray | 8192 | Tömb: |
Megjegyzés
Ezeket az állandókat a Visual Basic for Applications határozza meg. A nevek a kódban bárhol használhatók a tényleges értékek helyett.
Megjegyzések
A VarType függvény önmagában soha nem adja vissza a vbArray értékét. A rendszer mindig hozzáadja egy másik értékhez, hogy egy adott típusú tömböt jelöljön. A vbVariant állandót csak a vbArray függvénnyel együtt adja vissza, jelezve, hogy a VarType függvény argumentuma Variant típusú tömb. Az egész számok tömbjének visszaadott értéke például vbInteger + vbArray vagy 8194. Ha egy objektumnak van alapértelmezett tulajdonsága, a VarType(objektum) az objektum alapértelmezett tulajdonságának típusát adja vissza.
Példa
Megjegyzés
A következő példák egy Visual Basic for Applications (VBA) modulban mutatják be a függvény használatát. A VBA használatáról a Keresés elem mellett található legördülő listából a fejlesztői forrásokat választva, majd egy vagy több keresőszót megadva kaphat további tájékoztatást.
Ez a példa a VarType függvénnyel határozza meg egy változó altípusát.
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.