[注意]四舍五入问题 新手必看

chenguobin

Number: 要四舍五入的数



N   

: 小数位数


'Print myROUND(1.4367, 2)



'1.44






Function myROUND(Number As Double, N As

Integer) As Single



‘录自网上


myROUND =

Format(Int(Number * (10 ^ N) + 0.50000001) / (10 ^ N), "0." &

String(N, "0"))


End Function


注意:  以上     0.50000001



如果   改成      0.5   有时也可以得到正确答案   但 很多时候 得到错误的结果

zx994398

顶一下，新手必看。