Kaksoismuuttujatyyppi
VBA Kaksinkertainen tietotyyppiä käytetään numeroiden tallentamiseen, jotka vaativat desimaaleja. Se voi tallentaa -1,79769313486231E308 --4,94065645841247E -324 negatiivisille arvoille ja 4,94065645841247E -324-1,79769313486232E308 positiivisille arvoille.
Voit ilmoittaa kaksoismuuttujan käyttämällä Dim Statementia (lyhenne Dimension):
| 1 | Dim dblA kaksinkertaisena |
Käytä sitten yhtäsuuruusmerkkiä määrittääksesi muuttujalle arvon:
| 1 | dlbA = 3658,25 |
Tämän asettaminen menettelyyn näyttää tältä:
| 12345678 | Sub dblExample ()'ilmoita kaksinkertainen muuttujaDim dblA kaksinkertaisena'täytä kaksinkertainen muuttujadblA = 3658,25'näytä viestiruutuMsgBox dblAEnd Sub |
Jos suoritat yllä olevan koodin, seuraava viestiruutu tulee näkyviin.
Yksittäinen tietotyyppi
Single -tietotyyppi on vain lyhyempi versio Double -tietotyypistä. Tästä syystä se voi vaikuttaa pyöristykseen, kun sitä käytetään proseduurissa, koska yksittäinen tietotyyppi pyöristää neljään desimaaliin, kun taas kaksoisdatatyyppi pyöristää 12 desimaaliin. Jos et tarvitse kaksoisdatatyyppiä, voit käyttää yksittäistä tietotyyppiä
Int tai pitkät tietotyypit
Jos et tarvitse desimaalia, voit käyttää joko sisäistä tai pitkää tietotyyppiä.
| 1 | Dim intA kokonaislukuna |
| 1 | Dim lngB niin pitkä |
Ilmoita kaksinkertainen muuttuja moduulissa tai globaalilla tasolla
Edellisissä esimerkeissä olemme ilmoittaneet Double -muuttujan menettelyn sisällä. Proseduurilla ilmoitettuja muuttujia voidaan käyttää vain kyseisen menettelyn sisällä.
Sen sijaan voit ilmoittaa kaksoismuuttujia moduuli- tai globaalitasolla.
Moduulitaso
Moduulitaso muuttujat ilmoitetaan koodimoduulien yläosassa Himmeä lausunto.
Näitä muuttujia voidaan käyttää minkä tahansa koodimoduulin toimenpiteen kanssa.
Globaali taso
Globaali taso muuttujat ilmoitetaan myös koodimoduulien yläosassa. Sen sijaan, että käytät Himmeä lause, käytä Julkinen lausunto osoittaa, että Double -muuttuja on käytettävissä käytettäväksi koko VBA -projektisi.
| 1 | Julkinen DblA kaksinkertaisena |
Jos ilmoitat kaksoismuuttujan moduulitasolla ja yrität sitten käyttää sitä toisessa moduulissa, tapahtuu virhe.
Kuitenkin, jos olisit käyttänyt julkista avainsanaa kaksoismuuttujan ilmoittamiseen, virhe ei ilmenisi ja menettely toimisi täydellisesti.
Muoto kaksoistallennettu merkkijonoksi
Joskus haluat muotoilla kaksoisdatatyypin merkkijonoksi - esimerkiksi haluat näyttää valuuttasymbolin ja pyöristää luvun 2 desimaaliin.
Tämän saavuttamiseksi käytä Muoto -toimintoa.
Seuraava menettely
| 1234567891011 | AlatestiDoubleToCurrencyString ()'julistaa merkkijonomuuttujanDim strMoney merkkijonona'ilmoita kaksinkertainen ja täytä arvoDim dblValue KaksinkertaisenadblValue = 44055.256'muunna tupla merkkijonoksi, jossa on valuuttasymboli, jossa on kaksi desimaaliastrMoney = Muoto (dblValue, "$#, ## 0.00")'katso tulosMsgBox strMoneyEnd Sub |
palauttaisi tämän tuloksen:
Samoin saatat haluta näyttää numeron muotoilluna puhelinnumerona.
Tämä menettely:
| 1234567891011 | AlatestiDoubleToPhone ()'julistaa merkkijonomuuttujanHimmennä puhelinta merkkijonona'ilmoita kaksinkertainen ja täytä arvoDim dblValue KaksinkertaisenadblValue = 555968541'muuntaa tuplan merkkijonoksi, jossa on valuuttasymbolistrPhone = Muoto (dblValue, "(000) -000 0000")'katso tulosMsgBox strPhoneEnd Sub |
palauttaisi tämän tuloksen:
