Palauttaa muuttujan Integer alatyypin.
Syntaksi
VarType(varname)
Pakollinen varname argumentti on a Variant , joka sisältää minkä tahansa muuttujan lukuun ottamatta käyttäjän määrittämää tyyppiä.
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 |
Variant (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 (VBA). Voit käyttää nimiä koodissa missä tahansa todellisten arvojen sijasta.
Huomautuksia
Funktio VarType ei koskaan palauta arvoa vbArray omalle nimeltään. Se lisää aina kyseisen arvon toiseen arvoon ilmaistakseen tietyntyyppistä matriisia.
Vakio vbVariant palautetaan vain, vbArray kun se ilmaisee, että argumentti on VarType arvomatriisi Variant . Esimerkiksi kokonaislukumatriisille palautettu arvo on vbInteger + vbArray, tai 8194.
Jos objektilla on oletusominaisuus, VarType(object) 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.