Šī apmācība parādīs, kā izmantot CDbl VBA funkciju, lai pārvērstu izteiksmes dubultā datu tipā.
CDbl funkcija
VBA CDbl Pārvērst izteiksmi par veselu skaitli
Funkciju VBA CDbl var izmantot, lai pārvērstu izteiksmes dubultā datu tipā VBA kodā.
123456 | Apakš CDblExample_1 ()MsgBox CDbl (12.345) 'Rezultāts: 12.345MsgBox CDbl (-124) 'Rezultāts: -124MsgBox CDbl (0.000034) 'Rezultāts: 0.000034MsgBox CDbl (-12.000034) 'Rezultāts: -12.000034Beigu apakš |
VBA CDbl konvertējošā virkne uz dubultā
Funkciju VBA CDbl var izmantot, lai virknes pārvērstu dubultā, ja virknes rakstzīmēm ir nozīme kā skaitļiem.
123456789101112131415161718 | Papildu CDblExample_2 ()Dim StrEx kā virkneStrEx = "112"MsgBox CDbl (StrEx)"Rezultāts: 112StrEx = "0,0003"MsgBox CDbl (StrEx)Rezultāts: 0,0003StrEx = "11,00002"MsgBox CDbl (StrEx)'Rezultāts: 1100002, tiek ignorētsStrEx = "112 ASV dolāri"MsgBox CDbl (StrEx)'Rezultāts: 112 $ tiek ignorētsBeigu apakš |
VBA programmēšana | Kodu ģenerators strādā jūsu labā!
VBA CDbl izpildlaika kļūda 13 Tipa neatbilstība
Izmantojot VBA CDbl funkciju ar virknēm, kurās ir neskaitliskas rakstzīmes vai rakstzīmes, kurām nav nozīmes skaitliskajā kontekstā, radīsies izpildlaika kļūda “13”: tipa neatbilstība.
1234567 | Papildu CDblExample_3 ()'Tālāk norādītais kods parādīs ziņojumu KĻŪDA"CDbl nevar apstrādāt ne ciparu rakstzīmesDim StrEx kā virkneStrEx = "Ab13"MsgBox CDbl (StrEx)Beigu apakš |
VBA CDbl reģionālie iestatījumi
VBA CDbl funkcijai ir atšķirīga uzvedība, kas pārveido virknes ar komatu vai punktu. Decimālajam atdalītājam un ciparu atdalītājam tas izmanto operētājsistēmas reģionālos iestatījumus.
12345678910111213141516 | Papildu CDblExample_4 ()Dim StrEx kā virkneStrEx = "1,9"MsgBox CDbl (StrEx)'Ja reģionālajiem iestatījumiem ir, kā grupēšanas atdalītājs"Rezultāts: 19'Ja reģionālajos iestatījumos ir, kā decimāldaļu atdalītājs"Rezultāts: 1,9StrEx = "1,9"MsgBox CDbl (StrEx)“Ja reģionālajos iestatījumos ir. kā grupēšanas atdalītājs"Rezultāts: 19“Ja reģionālajos iestatījumos ir. kā decimāldaļu atdalītāju"Rezultāts: 1.9Beigu apakš |
VBA CDbl Būla pārvēršana dubultspēlēs
VBA CDbl funkcija var pārvērst Būla mainīgos divkāršos. Ja novērtētā izteiksme ir patiesa, iegūtais dubults ir -1 un ja novērtētā izteiksme ir nepatiesa, iegūtā dubultā ir 0.
12345678910 | Papildu CDblExample_5 ()Dim BoolEx kā BūlaBoolEx = taisnībaMsgBox CDbl (BoolEx) rezultāts: -1MsgBox CDbl (2 = 2) 'Rezultāts: -1BoolEx = nepatiesaMsgBox CDbl (BoolEx) rezultāts: 0MsgBox CDbl (1 = 2) 'Rezultāts: 0Beigu apakš |
Vai esat noguris no VBA koda piemēru meklēšanas? Izmēģiniet AutoMacro!
VBA CDbl Datumu pārvēršana dubultspēlēs
VBA CDbl funkcija var pārvērst datuma mainīgo par veselu skaitli. Atgrieztā vērtība ir noapaļots iekšējais numurs, ko Excel izmanto datuma glabāšanai.
123456789101112 | Papildu CDblExample_6 ()Dim DateEx kā datumsDateEx = #2/3/1940 #MsgBox CDbl (DateEx)Rezultāts: 14644DateEx = 1964. gada 8. jūlijs 22:41:00 #MsgBox CDbl (DateEx)"Rezultāts: 23596.9451388889DateEx = #3/7/1934 11:32:04 #MsgBox CDbl (DateEx)"Rezultāts: 12485,4806018519Beigu apakš |