See õpetus näitab, kuidas kasutada funktsiooni CDbl VBA avaldiste teisendamiseks topelt andmetüübiks.
CDbl funktsioon
VBA CDbl Teisenda avaldis täisarvuks
Funktsiooni VBA CDbl saab kasutada avaldiste teisendamiseks topelt andmetüübiks VBA koodi sees.
123456 | Alam -CDblExample_1 ()MsgBox CDbl (12.345) 'Tulemus: 12.345MsgBox CDbl (-124) 'Tulemus: -124MsgBox CDbl (0.000034) 'Tulemus on: 0.000034MsgBox CDbl (-12.000034) 'Tulemus: -12,000034End Sub |
VBA CDbl Stringi teisendamine kahekordseks
Funktsiooni VBA CDbl saab kasutada stringide teisendamiseks kahekordseks, kui stringi märkidel on numbrite tähendus.
123456789101112131415161718 | Alam -CDblExample_2 ()Dim StrEx stringinaStrEx = "112"MsgBox CDbl (StrEx)Tulemus: 112StrEx = "0,0003"MsgBox CDbl (StrEx)Tulemus: 0,0003StrEx = "11,00002"MsgBox CDbl (StrEx)'Tulemus on: 1100002, ignoreeritakseStrEx = "112 dollarit"MsgBox CDbl (StrEx)Tulemus on: 112 dollarit eiratakseEnd Sub |
VBA programmeerimine | Koodigeneraator töötab teie jaoks!
VBA CDbl käitustõrge 13 Tüübi mittevastavus
Kui kasutate funktsiooni VBA CDbl koos stringidega, mis sisaldavad mitte-numbrilisi märke või märke, millel pole numbrilises kontekstis tähendust, tekib käitusaja tõrge „13”: tüübi mittevastavus.
1234567 | Alam -CDblExample_3 ()'Allolev kood annab veateate"CDbl ei saa hakkama numbriliste märkidegaDim StrEx stringinaStrEx = "Ab13"MsgBox CDbl (StrEx)End Sub |
VBA CDbl piirkondlikud sätted
VBA CDbl funktsioonil on erinevad käitumismuundavad stringid koma või punktiga. See kasutab kümnend- ja numbrite eraldaja jaoks operatsioonisüsteemi piirkondlikke seadeid.
12345678910111213141516 | Alam -CDblExample_4 ()Dim StrEx stringinaStrEx = "1,9"MsgBox CDbl (StrEx)"Kui piirkondlikel seadetel on, siis rühmituse eraldajana"Tulemus: 19„Kui piirkondlikel seadistustel on see komakoha eraldajana"Tulemus: 1,9StrEx = "1,9"MsgBox CDbl (StrEx)„Kui piirkondlikel seadetel on. rühmituse eraldajana siis"Tulemus: 19„Kui piirkondlikel seadetel on. komaeraldajana siisTulemus on: 1.9End Sub |
VBA CDbl Booleanide teisendamine kahekordseks
VBA CDbl funktsioon võib teisendada loogilised muutujad kahekordseks. Kui hinnatud avaldis on tõene, on saadud kahekordne väärtus -1 ja kui hinnatud avaldis on vale, on saadud kahekordne 0.
12345678910 | Alam -CDblExample_5 ()Dim BoolEx kui BooleanBoolEx = TõsiMsgBox CDbl (BoolEx) 'Tulemus: -1MsgBox CDbl (2 = 2) 'Tulemus: -1BoolEx = valeMsgBox CDbl (BoolEx) 'Tulemus on: 0MsgBox CDbl (1 = 2) 'Tulemus: 0End Sub |
Kas olete väsinud VBA koodinäidete otsimisest? Proovige AutoMacrot!
VBA CDbl Kuupäevade teisendamine kahekordseks
VBA CDbl funktsioon saab teisendada kuupäevamuutuja täisarvuks. Tagastatud väärtus on sisemine number, mida Excel kasutab kuupäeva salvestamiseks, ümardatuna.
123456789101112 | Alam -CDblExample_6 ()Dim DateEx kui kuupäevDateEx = #2/3/1940 #MsgBox CDbl (DateEx)Tulemus: 14644DateEx = #8.07.1964 22:41:00 #MsgBox CDbl (DateEx)Tulemus: 23596,9451388889DateEx = #3/7/1934 11:32:04 AM #MsgBox CDbl (DateEx)Tulemus: 12485,4806018519End Sub |