Palauttaa kokonaisluvun, joka ilmaisee muuttujan alatyypin.
Syntaksi
VarType(varname)
Pakollinen varname-argumenttion muuttuja, joka sisältää minkä tahansa muuttujan paitsi käyttäjän määrittämän tyypin muuttujan.
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 palauttama arvo lasketaan vbInteger + vbArray tai 8194. Jos objektilla on oletusominaisuus, 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.