Egy változó altípusát jelző egész számot ad vissza.
Szintaxis
VarType ( varname )
A szükséges 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 objektum alapértelmezett tulajdonság rendelkezik, a VarType(object) 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.
