Ho usato anche
MyStr = Format(334.9, "###0.00") ' Restituisce "334,90"
Ma ho i seguenti problemi:
1) Se, ad esempio il numero è 127,23741 mi arrotonda al terzo decimale restituendomi 127,24 mentre mi dovrebbe dare 127,23.
2) Quando mi restituisce il secondo decimale "0" nella variabile (ad esempio 1,20) Mystr e poi faccio text1.text = Mystr mi toglie lo zero e mi diventa 1,2
Ora, mi rendo conto che mis tò perdendo in un bicchier d'acqua, ma visto che poi i miei dati vanno in stampa, ho bisogno di stampare tutti e due i miei decimali anche se sono ",00".
Possibile che non riesco a tirarci fuori le game??![]()
![]()
Mi postereste un esempino di un calcolo.
Io devo fare in modo da ottenere, partendo al prezzo ivato:
a) L'iva (del prezzo ivato)
b) L'imponibile
Ho fatto na cosa del genere:
text1 -----> il campo con l'importo ivato
text2 -----> la quantità
text3 -----> l'iva
text4 -----> l'imponibile
text5 -----> il totale
dim iva as double
dim imponibile as double
dim totale as double
dim importo_ivato as double
dim quantità as integer
importo_ivato = text1
quantità = text2
iva = (importo_ivato * quantità) / 1.2
iva = Format(iva, "###0.00")
imponibile = (importo_ivato - iva)
imponibile = Format(imponibile , "###0.00")
totale = iva + imponibile 'per fare tornare la somma precisa
totale = Format(totale , "###0.00")
text3 = iva
text4 = imponibile
text5 = totale
Azz, non mi funziona![]()
![]()
P.S.:Errata corrige. Non mi interessa l'arrotondamento al terzo decimale come detto nel messaggio precedente :tongue: