[VB6] FormatCurrency ed euro

[mardok30]

E' mai possibile che quando faccio dei calcoli con valori in Euro a volte mi vengono arrotondati bene ed altr volte la funziona formatcurrency non me li arrotonda?

For i = 0 To numeroarticoli.Text - 1
imponibile = imponibile + imptotale(i).Text
Next i

iva = (imponibile * 10) / 100

totalefattura = imponibile + iva


totaleimponibile.Text = FormatCurrency(imponibile, 2)

iva.Text = FormatCurrency(iva, 2)

totale.Text = FormatCurrency(totalefattura, 2)

totaleimponibile e totale mi danno valori corretti mentre iva.text mi arrotonda per difetto. Mi sapreste dare un consiglio su come risolvere il problemuccio?
Grazie e ciao

[giano118]

hai provato con Fix?
ciao

Originariamente inviato da mardok30
E' mai possibile che quando faccio dei calcoli con valori in Euro a volte mi vengono arrotondati bene ed altr volte la funziona formatcurrency non me li arrotonda?

For i = 0 To numeroarticoli.Text - 1
imponibile = imponibile + imptotale(i).Text
Next i

iva = (imponibile * 10) / 100

totalefattura = imponibile + iva


totaleimponibile.Text = FormatCurrency(imponibile, 2)

iva.Text = FormatCurrency(iva, 2)

totale.Text = FormatCurrency(totalefattura, 2)

totaleimponibile e totale mi danno valori corretti mentre iva.text mi arrotonda per difetto. Mi sapreste dare un consiglio su come risolvere il problemuccio?
Grazie e ciao

[mardok30]

Innanzitutto grazie per la risposta, diciamo che ne ho provate molte ma non ne vengo a capo.
Ho impostato il dataformat della text su valuta con due cifre decimali...ho provato con formatcurrecy...fix...round... ma niente, in alcuni semplici casi funziona, in altri non arrotonda a dovere es:
imponibile: 79,05 =>GIUSTO
iva: 7,90 => ERRATO, dovrebbe essere 7,91
totale: 86,955 => ERRATO, dovrebbe essere 86,96
questi valori li ottengo con l'impostazione della text su "valuta"

esiste un algoritmo che tenga in considerazione tutti i possibili arrotondamenti per l'euro? visto che in automatico non funziona...

Spero qlc1 possa aiutarmi...

[giano118]

tempo fà avevo il tuo stesso problema...
ora non ricordo come l'ho risolto, appena rientro dò un'occhiata al sorgente e ti faccio sapere!

Originariamente inviato da mardok30
Innanzitutto grazie per la risposta, diciamo che ne ho provate molte ma non ne vengo a capo.
Ho impostato il dataformat della text su valuta con due cifre decimali...ho provato con formatcurrecy...fix...round... ma niente, in alcuni semplici casi funziona, in altri non arrotonda a dovere es:
imponibile: 79,05 =>GIUSTO
iva: 7,90 => ERRATO, dovrebbe essere 7,91
totale: 86,955 => ERRATO, dovrebbe essere 86,96
questi valori li ottengo con l'impostazione della text su "valuta"

esiste un algoritmo che tenga in considerazione tutti i possibili arrotondamenti per l'euro? visto che in automatico non funziona...

Spero qlc1 possa aiutarmi...