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 = 459 StrVar = "Hello World" DateVar = #2/12/69# MyCheck = VarType(IntVar) ' Returns 2. MyCheck = VarType(DateVar) ' Returns 7. MyCheck = VarType(StrVar) ' Returns 8.