See artikkel näitab funktsiooni VarType kasutamist VBA -s.
VarType tähendab muutuja tüüpi. Võime anda muutuja nime funktsioonile VarType ja see tagastab täisarvu, mis kujutab sellesse muutujale salvestatud andmete tüüpi vastavalt VBA konstandite loendile.
Variant Muutuja kasutamine VarType leidmiseks
Muutuja saame deklareerida muutujaks Variant. See võimaldab meil sellesse salvestada mis tahes tüüpi lubatud andmeid. Seejärel saame selle muutuja täita ja kasutada funktsiooni VarType, et näha, millist tüüpi andmeid muutuja sisaldab.
Näiteks:
12345 | AlamkatseVarType ()Dim MyVariable VariantinaMyVariable = "Tere maailm"MsgBox "Muutuja tüüp on" & VarType (MyVariable)End Sub |
See tagastab järgmise sõnumikasti:
Seetõttu tagastatakse väärtus 8. See on Exceli konstant, mis määratleb muutujatesse salvestatavate andmete tüübi.
See konstantne väärtus vastab järgmisele tabelile:
Pidev | Väärtus | Kirjeldus |
---|---|---|
vbTühi | 0 | Tühi (initsialiseerimata) |
vbNull | 1 | Null (kehtivaid andmeid pole) |
vbInteger | 2 | Täisarv |
vbPikk | 3 | Pikk täisarv |
vbSingle | 4 | Ühe täpsusega ujukomaarv |
vbKahekordne | 5 | Kahekordse täpsusega ujukomaarv |
vbValuuta | 6 | Valuuta väärtus |
vbKuupäev | 7 | Kuupäeva väärtus |
vbString | 8 | String |
vbObjekt | 9 | Objekt |
vbViga | 10 | Viga väärtus |
vbBoolean | 11 | Loogiline väärtus |
vbVariant | 12 | Variant (kasutatakse ainult mitmesuguste variantidega) |
vbDataObject | 13 | Andmetele juurdepääsu objekt |
vbDecimal | 14 | Kümnendväärtus |
vbByte | 17 | Baidi väärtus |
vbLongLong | 20 | Pikk täisarv (kehtib ainult 64-bitistel platvormidel) |
vbUserDefinedType | 36 | Variandid, mis sisaldavad kasutaja määratud tüüpe |
vbArray | 8192 | Massiiv (selle funktsiooni tagastamisel lisatakse see alati teisele konstandile) |
Võime proovida teist näidet:
12345 | AlamkatseVarType ()Dim MyVariable variandinaMinu muutuja = 32760MsgBox "Muutuja tüüp on" & VarType (MyVariable)End Sub |
Seekord tagastab sõnumikast 2, kuna muutujatesse salvestatud andmetüüp on täisarv.
Kui aga muudame väärtuseks 32780, on väärtuse tagastuseks 3 - Pikk täisarv täisarvulise andmetüübi maksimaalne väärtus on 32767; pärast seda on see pikk täisarv.
Kui peaksime koodi uuesti muutma:
12345 | AlamkatseVarType ()Dim MyVariable VariantinaMinu muutuja = 32760,52MsgBox "Muutuja tüüp on" & VarType (MyVariable)End Sub |
Nüüd tagastatakse väärtus 5 - kümnendkohtade tõttu on andmetüüp kahekordne.
Kui me paneksime muutuja väärtuse jutumärkidesse, tagastatakse taas 8, kuna kõik jutumärkides sisalduvad väärtused salvestatakse stringiväärtusena.
12345 | AlamkatseVarType ()Dim MyVariable variandinaMinu muutuja = "32760.52"MsgBox "Muutuja tüüp on" & VarType (MyVariable)End Sub |