Tip variabil dublu
VBA Dubla tipul de date este utilizat pentru a stoca numere care necesită zecimale. Poate stoca de la -1.79769313486231E308 la -4.94065645841247E-324 pentru valori negative și de la 4.94065645841247E-324 la 1.79769313486232E308 pentru valori pozitive.
Pentru a declara o variabilă dublă, utilizați declarația Dim (prescurtare pentru Dimension):
| 1 | Dim dblA ca Dublu |
Apoi, pentru a atribui o valoare unei variabile, pur și simplu utilizați semnul egal:
| 1 | dlbA = 3658,25 |
Punerea acestui lucru într-o procedură arată astfel:
| 12345678 | Sub dblExample ()'declarați dubla variabilăDim dblA ca Dublu'populează variabila dublădblA = 3658,25'arată caseta de mesajeMsgBox dblASfârșitul Sub |
Dacă rulați codul de mai sus, va fi afișată următoarea casetă de mesaj.
Tip unic de date
Tipul de date unic este doar o versiune mai scurtă a tipului de date dublu. Datorită acestui fapt, poate efectua rotunjirea atunci când este utilizat într-o procedură, deoarece tipul de date unic va rotunji la 4 zecimale, în timp ce Tipul de date dublu va rotunji la 12 zecimale. Dacă nu aveți nevoie de tipul de date dublu, puteți utiliza tipul de date unic
Tipuri de date Int sau Long
Dacă nu aveți nevoie de o zecimală, puteți utiliza fie tipul de date Int, fie tipul de date Long.
| 1 | Dim intA ca întreg |
| 1 | Dim lngB ca Long |
Declarați dubla variabilă la nivel de modul sau global
În exemplele anterioare, am declarat variabila Double în cadrul unei proceduri. Variabilele declarate cu o procedură pot fi utilizate numai în cadrul acestei proceduri.
În schimb, puteți declara variabile duble la nivel de modul sau global.
Nivelul modulului
Nivelul modulului variabilele sunt declarate în partea de sus a modulelor de cod cu Dim afirmație.
Aceste variabile pot fi utilizate cu orice procedură din acel modul de cod.
Nivel global
La nivel global variabilele sunt de asemenea declarate în partea de sus a modulelor de cod. Cu toate acestea, în loc să utilizați fișierul Dim declarație, utilizați Public declarație pentru a indica faptul că variabila Double este disponibilă pentru a fi utilizată pe tot parcursul Proiectului VBA.
| 1 | Public DblA ca Double |
Dacă ar fi să declarați variabila dublă la un nivel de modul și apoi să încercați să o utilizați într-un alt modul, va apărea o eroare.
Cu toate acestea, dacă ați fi folosit cuvântul cheie Public pentru a declara variabila dublă, eroarea nu ar apărea și procedura ar rula perfect.
Formatează dublu stocat ca șir
Poate exista un moment în care doriți să formatați un tip de date dublu într-un șir - de exemplu, poate doriți să afișați un simbol valutar și să rotunjiți numărul cu 2 zecimale.
Pentru a realiza acest lucru, utilizați funcția Format.
Următoarea procedură
| 1234567891011 | Sub TestDoubleToCurrencyString ()'declarați variabila șirDim strMoney As String'declarați dublul și completați valoareaDim dblValue As DoubleValoare dbl = 44055.256'convertiți dublul într-un șir cu un simbol valutar cu 2 zecimalestrMoney = Format (dblValue, "$ #, ## 0.00")'vizualizați rezultatulMsgBox strMoneySfârșitul Sub |
ar returna acest rezultat:
În mod similar, poate doriți să afișați un număr ca număr de telefon formatat.
Această procedură:
| 1234567891011 | Sub TestDoubleToPhone ()'declarați variabila șirDim strPhone As String'declarați dublul și completați valoareaDim dblValue As DoubledblValue = 555968541'convertiți dublul într-un șir cu un simbol valutarstrPhone = Format (dblValue, "(000) -000 0000")'vizualizați rezultatulMsgBox strPhoneSfârșitul Sub |
ar returna acest rezultat:
