Rounding Issue for Currency

[BeallDon]

I'm using the "round" function in my form to do tax calculations but when the result is 3 decimal places and ending in a 5, the "round" function rounds it DOWN. Is the something I could do to make it round UP if the result is half a cent?

Gross = me.GrossAmount (from the form)
CommissionRate = 15%
CommissionAmount = [Gross] * [CommissionRate]
TaxRate = 5%
TaxAmount = [CommissionAmount] * [TaxRate]

example 1:
Gross = 195
CommissionAmount = 29.25
TaxAmount = 1.4625 ...... Round([TaxAmount],2) results in 1.46 which is correct....however...

example 2:
Gross = 190
CommissionAmount = 28.50
TaxAmount = 1.425 ...... Round([TaxAmount],2) results in 1.42 instead of the desired result of 1.43.

Any suggestions would be appreciated.

 

[MajP]

VBA uses bankers rounding, therefore you get these results. This discussion explains the many ways to round and provides custom functions.

http://support.microsoft.com/kb/196652