Tämä opetusohjelma osoittaa, kuinka CDbl VBA -toimintoa käytetään lausekkeiden muuntamiseen kaksinkertaiseksi tietotyypiksi.
CDbl -toiminto
VBA CDbl Muunna lauseke kokonaisluvuksi
VBA CDbl -toimintoa voidaan käyttää lausekkeiden muuntamiseen kaksoisdatatyypiksi VBA -koodin sisällä.
123456 | Ala -CDblExample_1 ()MsgBox CDbl (12.345) 'Tulos: 12.345MsgBox CDbl (-124) 'Tulos: -124MsgBox CDbl (0.000034) 'Tulos: 0.000034MsgBox CDbl (-12.000034) 'Tulos: -12.000034End Sub |
VBA CDbl -merkkijonon muuntaminen kaksinkertaiseksi
VBA CDbl -toimintoa voidaan käyttää merkkijonojen kaksinkertaistamiseen, jos merkkijonon merkillä on merkitys numeroina.
123456789101112131415161718 | Ala -CDblExample_2 ()Dim StrEx merkkijononaStrEx = "112"MsgBox CDbl (StrEx)'Tulos: 112StrEx = "0,0003"MsgBox CDbl (StrEx)'Tulos: 0,0003StrEx = "11,00002"MsgBox CDbl (StrEx)'Tulos: 1100002, jätetään huomiottaStrEx = "112 dollaria"MsgBox CDbl (StrEx)'Tulos on: 112 dollaria jätetään huomiottaEnd Sub |
VBA -ohjelmointi | Koodigeneraattori toimii sinulle!
VBA CDbl ajonaikainen virhe 13 Tyyppivirhe
Jos käytät VBA CDbl -toimintoa merkkijonojen kanssa, jotka sisältävät ei-numeerisia merkkejä tai merkkejä, joilla ei ole merkitystä numeerisessa kontekstissa, tuloksena on ajonaikainen virhe '13': Tyyppivirhe.
1234567 | Ala -CDblExample_3 ()'Alla oleva koodi johtaa ERROR -viestiin"CDbl ei voi käsitellä muita kuin numeerisia merkkejäDim StrEx merkkijononaStrEx = "Ab13"MsgBox CDbl (StrEx)End Sub |
VBA CDbl alueelliset asetukset
VBA CDbl -toiminnolla on erilaiset käyttäytymisen muuntavat merkkijonot pilkulla tai pisteellä. Se käyttää käyttöjärjestelmän alueasetuksia desimaalierottimelle ja numeroerottimelle.
12345678910111213141516 | Ala -CDblExample_4 ()Dim StrEx merkkijononaStrEx = "1,9"MsgBox CDbl (StrEx)'Jos alueellisissa asetuksissa on, ryhmittelyerottimena'Tulos: 19'Jos alueellisissa asetuksissa on, desimaalierottimena'Tulos: 1,9StrEx = "1,9"MsgBox CDbl (StrEx)'Jos alueellisissa asetuksissa on. ryhmittelyerottimena sitten'Tulos: 19'Jos alueellisissa asetuksissa on. sitten desimaalierottimena'Tulos on: 1.9End Sub |
VBA CDbl Boolen muuntaminen nelinkertaiseksi
VBA CDbl -toiminto voi muuntaa boolen muuttujat kaksinkertaisiksi. Jos arvioitu lauseke on tosi, tuloksena oleva kaksoiskappale on -1 ja jos arvioitu lauseke on epätosi, tuloksena oleva kaksoiskappale on 0.
12345678910 | Ala -CDblExample_5 ()Dim BoolEx Boolen muodossaBoolEx = TottaMsgBox CDbl (BoolEx) 'Tulos: -1MsgBox CDbl (2 = 2) 'Tulos: -1BoolEx = vääräMsgBox CDbl (BoolEx) 'Tulos: 0MsgBox CDbl (1 = 2) 'Tulos: 0End Sub |
Oletko kyllästynyt etsimään esimerkkejä VBA -koodista? Kokeile AutoMacroa!
VBA CDbl Päivämäärien muuntaminen tuplaksi
VBA CDbl -toiminto voi muuntaa päivämäärämuuttujan kokonaisluvuksi. Palautettu arvo on Excelin sisäinen numero päivämäärän tallennukseen pyöristettynä.
123456789101112 | Ala -CDblExample_6 ()Dim DateEx PäivämääränäDateEx = #2/3/1940 #MsgBox CDbl (DateEx)Tulos: 14644DateEx = #8.7.1964 22:41:00 #MsgBox CDbl (DateEx)'Tulos: 23596.9451388889DateEx = #3/7/1934 11:32:04 AM #MsgBox CDbl (DateEx)'Tulos: 12485,4806018519End Sub |