Come affrontare gli errori di arrotondamento sui doppi in vb.net?
-
06-07-2019 - |
Domanda
Sto cercando di bilanciare un insieme di valori di valuta usando vb.net. I totali per entrambi questi valori sono espressi in doppio. Ricevo errori di arrotondamento in alcune situazioni.
Qual è il modo migliore per evitarlo? C'è un tipo che posso usare preferibilmente per raddoppiare? Come arrotondare il valore risultante a due cifre decimali?
Ecco il mio codice - probabilmente non ho bisogno di mostrarlo, ma per ogni evenienza.
Dim nInvValue As Double
Dim nCreditValue As Double
For Each oReferenceItem In oMatchInvoices
Dim nUnallocated As Double = oReferenceItem.DocumentOutstandingValue - oReferenceItem.DocumentAllocatedValue
If ((nUnallocated <> 0) And (sReferenceValue = oReferenceItem.InstrumentNo)) Then
iCount = iCount + 1
If (oReferenceItem.IsDebit) And (nUnallocated > 0) Then
nInvValue = nInvValue + nUnallocated
InvoiceList.Add(nUnallocated.ToString("c"), oReferenceItem.URN.ToString)
End If
If (oReferenceItem.IsCredit) And (nUnallocated < 0) Then
nCreditValue = nCreditValue - nUnallocated
CreditList.Add(nUnallocated.ToString("c"), oReferenceItem.URN.ToString)
End If
End If
Next
Soluzione
Per i calcoli finanziari credo che la saggezza attuale sia quella di utilizzare i decimali anziché i doppi.
Potresti essere interessato a questa discussione Decimal vs. Doppia .
Altri suggerimenti
Prova a usare il tipo Decimale.
Autorizzato sotto: CC-BY-SA insieme a attribuzione
Non affiliato a StackOverflow