Italian trasformare un importo in un intero

fabio_linate_milano said:

Salve a tutti

Nel realizzare un'applicazioncina ho avuto la necessità di memorizzare degli importi in un db SQLite. Ho pensato di definire il campo (della tabella sqlite) come intero quindi moltiplicare gli importi * 100 e registrali nel DB per poi dividerli per 100 quando vado a ripescarli dal db.
Nel fare questo mi sono imbattuto in una cosa curiosa

B4X:

Dim l As Long
Dim d As Double

d = 1250.60
l = d * 100
Msgbox(l, "")

quando d vale 1250.60 moltiplicato * 100 fornisce 125059 !!!!!
una spiegazione per l'arcano?

un saluto

p.s. provare per credere

Click to expand...

Dim l As Long
Dim d As Double

d = 1250.60
l = Round(d * 100)
Msgbox(l, "")