Dobbelt variabel type
VBA Dobbelt datatype bruges til at gemme tal, der kræver decimaler. Den kan gemme fra -1.79769313486231E308 til -4.94065645841247E -324 for negative værdier og 4.94065645841247E -324 til 1.79769313486232E308 for positive værdier.
For at deklarere en dobbelt variabel bruger du Dim Statement (forkortelse for Dimension):
| 1 | Dim dblA som dobbelt |
For derefter at tildele en værdi til en variabel skal du blot bruge lighedstegnet:
| 1 | dlbA = 3658,25 |
At sætte dette i en procedure ser sådan ud:
| 12345678 | Sub dblExample ()'erklærer den dobbelte variabelDim dblA som dobbelt'udfyld den dobbelte variabeldblA = 3658,25'vis meddelelsesboksenMsgBox dblAAfslut Sub |
Hvis du kører koden ovenfor, vises følgende meddelelsesboks.
Enkelt datatype
Den enkelte datatype er blot en kortere version af den dobbelte datatype. På grund af denne kendsgerning kan det påvirke afrundingen, når den bruges i en procedure, da den enkelte datatype vil runde til 4 decimaler, mens den dobbelte datatype vil runde til 12 decimaler. Hvis du ikke har brug for den dobbelte datatype, kan du bruge den enkelte datatype
Int eller lange datatyper
Hvis du ikke har brug for en decimal, kan du enten bruge Int -datatypen eller lang datatype.
| 1 | Dim intA som heltal |
| 1 | Dim lngB som lang |
Deklarér dobbelt variabel på modul eller globalt niveau
I de foregående eksempler har vi erklæret Double -variablen inden for en procedure. Variabler, der er angivet med en procedure, kan kun bruges inden for denne procedure.
I stedet kan du erklære Double variabler på modulet eller globalt niveau.
Modulniveau
Modulniveau variabler erklæres øverst i kodemodulerne med Svag udmelding.
Disse variabler kan bruges med enhver procedure i det pågældende kodemodul.
Globalt niveau
Globalt niveau variabler erklæres også øverst i kodemodulerne. Men i stedet for at bruge Svag erklæring, brug Offentlig erklæring for at angive, at Double -variablen er tilgængelig til brug i hele dit VBA -projekt.
| 1 | Offentlig DblA som dobbelt |
Hvis du skulle erklære den dobbelte variabel på et modulniveau og derefter prøve at bruge den i et andet modul, ville der opstå en fejl.
Men hvis du havde brugt det offentlige søgeord til at deklarere den dobbelte variabel, ville fejlen ikke opstå, og proceduren ville køre perfekt.
Format Dobbelt lagret som streng
Der kan være et tidspunkt, hvor du ønsker at formatere en dobbelt datatype til en streng - for eksempel vil du måske vise et valutasymbol og afrunde tallet til 2 decimaler.
For at opnå dette bruger du formateringsfunktionen.
Følgende procedure
| 1234567891011 | Sub TestDoubleToCurrencyString ()'erklærer strengvariablenDim strPenge som streng'erklærer det dobbelte og udfyld værdienDim dblVærdi som dobbeltdblValue = 44055,256'konverter dobbelten til en streng med et valutasymbol med 2 decimalerstrMoney = Format (dblValue, "$#, ## 0.00")'se resultatetMsgBox strPengeAfslut Sub |
ville returnere dette resultat:
På samme måde vil du måske vise et nummer som et formateret telefonnummer.
Denne procedure:
| 1234567891011 | Sub TestDoubleToPhone ()'erklærer strengvariablenDim strPhone Som streng'erklærer det dobbelte og udfyld værdienDim dblVærdi som dobbeltdblValue = 555968541'konverter dobbelten til en streng med et valutasymbolstrPhone = Format (dblValue, "(000) -000 0000")'se resultatetMsgBox strPhoneAfslut Sub |
ville returnere dette resultat:
