Keskustelu: Koodit: VB6: Pitkä desimaaliluku

tnb [29.11.2003 11:34:17]

VB6:ssä on mahdollisuus käyttää myös 28 desimalin laskentatarkkuutta kun käyttää variant muuttujaa johon ladataan luku joka on CDec functiolla muuettu decimal alatyypiksi.

'esimerkki pitkän desimaalimuodon käytöstä
Private Sub Command1_Click()
    Dim a As Variant 'pitää olla variantti
    Dim b As Long
    Dim c As Double
    b = 7
    c = 7
    a = CDec(b) ' muunnos pitkään desimaalimuotoon
    'pitkä desimaali
    Text1.Text = CStr(1 / a) ' 0,1428571428571428571428571429
    'double
    Text2.Text = CStr(1 / c) ' 0,142857142857143
End Sub

sooda [29.11.2003 19:03:05]

Pitkiä kyllä saa mutta missä tarvitsee noin tarkkoja? no huh...

ZcMander [29.11.2003 19:08:27]

Piissä

sooda [30.11.2003 10:12:20]

Mutta ei kyllä piitäkään tarvitse noin tarkasti missään...

ZcMander [10.12.2003 19:22:24]

Ei tarvi, mutta esim laskenta ohjelmaan...

Vastaus

Aihe on jo aika vanha, joten et voi enää vastata siihen.

Kirjautuminen

Haku