关于四舍五入问题

taogon

用的round函数保留一位小数时出现5时不进位的问题，见附件

如2.25 应该是2.3，但是实际取到2.2，不知道什么原因，请高手指点

但是2.35取到的是2.4

[此贴子已经被作者于2007-3-27 13:09:17编辑过]

WDLRCZT

这是以前从网上找到关于解决四舍五入的方法,看看能不能满足你的要求


'作者：huanghai 文章来源：AccessQQ  更新时间：2004-11-23
'自定义自四舍五入函数
'解决ACCESS97以下版本不支持Round函数
'解决Round"有名"的四舍六入现象

'参数: Number , 要进入四舍五入的数值
'参数:N,要保留的小数位数,不足时以0补上

'用法:
'Print myRound(1.4367, 2)
'1.44
Function myRound(Number As Double, N As Integer) As String
    myRound = Format(Int(Number * (10 ^ N) + 0.5) / (10 ^ N), "0." & String(N, "0"))
End Function

taogon

谢谢，我的解决方法是加0.00000000001，就可以正常进位了

如：round(2.25+0.000000001,1)就得到2.3可以正常进位

我想知道这是不是一个BUG啊，害得我工作中差点处理大问题。

wjw8216

[:30] 学习了呵呵

rcylbx

[:28] [:28]