Palauttaa kokonaisluvun, joka osoittaa muuttuja alatyypin.
Syntaksi
VarType ( muuttujannimi )
Pakollinen muuttujannimiargumentti on variantti, joka sisältää minkä tahansa muuttujan lukuun ottamatta käyttäjän määrittämän tyypin muuttujaa.
Palautusarvot
|
Vakio |
Arvo |
Kuvaus |
|
vbEmpty |
0 |
Tyhjä (alustamaton) |
|
vbNull |
1 |
Tyhjäarvo (ei kelvollisia tietoja) |
|
vbInteger |
2 |
Kokonaisluku |
|
vbLong |
3 |
Pitkä kokonaisluku |
|
vbSingle |
4 |
Perustarkkuuksinen liukuluku |
|
vbDouble |
5 |
Kaksoistarkkuuksinen liukuluku |
|
vbCurrency |
6 |
Valuutta-arvo |
|
vbDate |
7 |
Päivämääräarvo |
|
vbString |
8 |
Merkkijono |
|
vbObject |
9 |
Objekti |
|
vbError |
10 |
Virhearvo |
|
vbBoolean |
11 |
Totuusarvo |
|
vbVariant |
12 |
Muuttuja (käytetään vain muuttujamatriiseissa) |
|
vbDataObject |
13 |
DAO-objekti |
|
vbDecimal |
14 |
Desimaaliarvo |
|
vbByte |
17 |
Tavuarvo |
|
vbUserDefinedType |
36 |
Muuttujat, jotka sisältävät käyttäjän määrittämiä tyyppejä |
|
vbArray |
8192 |
Matriisi |
Huomautus: Nämä vakiot on määrittänyt Visual Basic for Applications. Nimiä voidaan käyttää koodissa missä tahansa todellisten arvojen sijasta.
Huomautuksia
VarType-funktio ei koskaan palauta vbArray-funktion arvoa sinänsä. Se lisätään aina johonkin muuhun arvoon, joka osoittaa tietyn tyypin matriisin. Vakio vbVariant palautetaan vain yhdessä vbArrayn kanssa osoittamaan, että VarType-funktion argumentti on varianttityyppinen matriisi. Esimerkiksi kokonaislukumatriisin palautettu arvo lasketaan muodossa vbInteger + vbArray tai 8194. Jos objektilla on oletusarvoinen ominaisuus, VarType(objekti) palauttaa objektin oletusominaisuuden tyypin.
Esimerkki
Huomautus: Seuraavissa esimerkeissä kerrotaan, kuinka tätä funktiota käytetään Visual Basic for Applications (VBA) -moduulissa. Jos haluat lisätietoja VBA:n käytöstä, valitse Sovelluskehittäjän opasHaku-kentän viereisestä luettelosta ja anna yksi tai useampi hakuehto hakukenttään.
Tässä esimerkissä VarType-funktiolla määritetään muuttujan alatyyppi.
Dim IntVar, StrVar, DateVar, MyCheck' Initialize variables.IntVar = 459StrVar = "Hello World"DateVar = #2/12/69# MyCheck = VarType(IntVar) ' Returns 2.MyCheck = VarType(DateVar) ' Returns 7.MyCheck = VarType(StrVar) ' Returns 8.