Dubultā mainīgā tips
VBA Dubultā datu tips tiek izmantots, lai saglabātu ciparus, kas prasa aiz komata. Tā var saglabāt no -1,79769313486231E308 līdz -4,94065645841247E -324 negatīvām vērtībām un 4,94065645841247E -324 līdz 1,79769313486232E308 pozitīvām vērtībām.
Lai deklarētu dubulto mainīgo, izmantojiet Dim Statement (saīsinājums no Dimension):
1 | Dim dblA kā Double |
Pēc tam, lai mainīgajam piešķirtu vērtību, vienkārši izmantojiet vienādības zīmi:
1 | dlbA = 3658,25 |
Ievietošana procedūrā izskatās šādi:
12345678 | Subbl. Piemērs ()'deklarē dubulto mainīgoDim dblA kā Double'aizpildiet dubulto mainīgodblA = 3658,25'parādīt ziņojumu lodziņuMsgBox dblABeigu apakš |
Ja palaižat iepriekš minēto kodu, tiks parādīts šāds ziņojumu lodziņš.
Viens datu tips
Viens datu tips ir tikai dubultā datu tipa īsāka versija. Šī iemesla dēļ tas var ietekmēt noapaļošanu, ja to izmanto procedūrā, jo viens datu tips noapaļos līdz 4 zīmēm aiz komata, bet dubultā datu tips - līdz 12 zīmēm aiz komata. Ja jums nav nepieciešams dubultā datu tips, varat izmantot vienu datu tipu
Int vai gari datu tipi
Ja jums nav nepieciešama decimāldaļa, varat izmantot datu tipu Int vai Long.
1 | Dim intA kā vesels skaitlis |
1 | Dim lngB kā garš |
Deklarēt dubulto mainīgo moduļa vai globālā līmenī
Iepriekšējos piemēros procedūras ietvaros esam deklarējuši mainīgo dubultā. Ar procedūru deklarētos mainīgos var izmantot tikai šīs procedūras ietvaros.
Tā vietā jūs varat deklarēt dubultos mainīgos moduļa vai globālā līmenī.
Moduļa līmenis
Moduļa līmenis mainīgie tiek deklarēti koda moduļu augšpusē ar Izmērs paziņojums, apgalvojums.
Šos mainīgos var izmantot jebkurā koda moduļa procedūrā.
Globālais līmenis
Globālais līmenis mainīgie tiek deklarēti arī koda moduļu augšpusē. Tomēr tā vietā, lai izmantotu Izmērs paziņojumu, izmantojiet Publisks paziņojums, kas norāda, ka dubultā mainīgais ir pieejams izmantošanai visā jūsu VBA projektā.
1 | Publiskā DblA kā dubultā |
Ja jūs deklarētu dubulto mainīgo moduļa līmenī un pēc tam mēģinātu to izmantot citā modulī, notiktu kļūda.
Tomēr, ja dubultā mainīgā deklarēšanai būtu izmantojis publisko atslēgvārdu, kļūda nenotiktu un procedūra darbotos nevainojami.
Formāts dubultā veidā tiek saglabāts kā virkne
Var gadīties, ka vēlaties divkāršu datu tipu formatēt virknē - piemēram, varat parādīt valūtas simbolu un noapaļot skaitli līdz divām zīmēm aiz komata.
Lai to panāktu, izmantojiet funkciju Formatēt.
Tālāk norādītā procedūra
1234567891011 | Sub TestDoubleToCurrencyString ()'deklarējiet virknes mainīgoDim strMoney kā virkne'deklarējiet dubultā un aizpildiet vērtībuDim dblValue Kā dubultādblValue = 44055.256'konvertējiet dubultā par virkni ar valūtas simbolu ar 2 zīmēm aiz komatastrMoney = Formāts (dblValue, "$#, ## 0.00")'apskatīt rezultātuMsgBox strMoneyBeigu apakš |
atgrieztu šādu rezultātu:
Līdzīgi, iespējams, vēlēsities parādīt numuru kā formatētu tālruņa numuru.
Šī procedūra:
1234567891011 | ApakštestsDoubleToPhone ()'deklarējiet virknes mainīgoDim strPhone kā virkne'deklarējiet dubultā un aizpildiet vērtībuDim dblValue Kā dubultādblValue = 555968541'konvertējiet dubultā par virkni ar valūtas simbolustrPhone = Formāts (dblValue, "(000) -000 0000")'apskatīt rezultātuMsgBox strPhoneBeigu apakš |
atgrieztu šādu rezultātu: