Round() 函数问题

[Alang_79]

为什么 Round(1.6485,3)=1.648 而不等于1.649？
Round(1.6475,3)=1.648
Round(1.6465,3)=1.646
Round(1.6455,3)=1.646

[LCAAA]

应该没问题吧！
我是用format(1.6485,"0.000")
这样也可以实现一样的效果。

[penglc]

好象是国际财务通用的四舍五入取偶法:

http://expert.csdn.net/Expert/TopicView1.asp?id=1988003

[gpo2002]

Debug.Print Round(1.6415, 3)
Debug.Print Round(1.6425, 3)
Debug.Print Round(1.6435, 3)
Debug.Print Round(1.6445, 3)
Debug.Print Round(1.6455, 3)
Debug.Print Round(1.6465, 3)
Debug.Print Round(1.6475, 3)
Debug.Print Round(1.6485, 3)
Debug.Print Round(1.6495, 3)

以前讨论过，它的进位方式是判断最后位奇数偶数的

[Alicky]

VB的Bug?!?

Round(1.6465001,3)=1.647

[Alang_79]

怎么才能让它偶数也进位呢？