somma importi arrotondata

Ciaoo.. e buona giornata a tutti voi.....
vi posto il codice e poi vi spiego il problema

 Dim A As Integer
Dim B As Integer
A = Text5.Text
B = Text6.Text
Text8.Text = A + B

Text8.Text = Format(Text8.Text, "##,#0.00")

tengo a precisare che prima di postare questa discussione ho sfogliato un po' il forum in cerca di una soluzione..... probabilmente ho cercato male. cmq.

il risultato della somma mi viene arrotondato cioe':
dovrebbe darmi 27,40
invece mi da' 27,00
che tipo di formattazione devo usare ???? Aiutoooooo.....

Ops: dimenticavo anche text5 e text6 hanno la stessa formattazione e il calcolo dell'iva invece e' esatto senza arrotondamenti

grassieeee

Ciao,
se vuoi che i calcoli avvengano correttamente devi usare CDbl.
Il valore viene convertito in double, e passare come argomento la text

Text3.text = CDbl(text1.text) + CDbl(Text2.text)

Nell'altro caso i valori erano sempre interi.

grazie Cippalippa provo e ti foooo sapere...

Ok adesso va bene.... eppure mi era sembrato di averlo usato Bhooooo...

cmq. grazzieeeee e a buon rendere

Originariamente inviato da Mercante in fiera

 Dim A As Integer
Dim B As Integer

In effetti, cosa ti aspettavi dopo aver dichiarato le variabili come Integer (cioè numeri interi)?

Be..... yronium io non mi aspettavo nulla.....
per questo ho chiesto un consiglio

cmq. grazie di avermi ricordato di ancora molto......

Ciaooo e grazzie a tutti