VB.Net 为什么 Math.Round 将 5 舍入到最接近的偶数，我该怎么办？ [复制]

Question

为什么 Math.Round(0.125, 2) 舍入为 0.12？

Dim foo As Decimal
foo = Math.Round(0.125, 2)

foo 现在是 0.12，但应该是 0.13

我听说这是因为 .Net 中的某些标准四舍五入到最接近的偶数，但这只是糟糕的数学。 12.5 将向下舍入为 12，但 13.5 将向上舍入为 14。有没有办法解决这个问题？

Answer 1

来自documentation 方法上的Math.Round(decimal)：

如果d的小数部分在两个整数的中间，其中一个为偶数，另一个为奇数，则返回偶数。

同样的逻辑也适用于Math.Round(decimal, int) 重载。注意：

Math.Round(0.125, 2) // 0.12
Math.Round(0.135, 2) // 0.14
Math.Round(0.145, 2) // 0.14

这不是“糟糕的数学”；这是一种常见的舍入策略，称为“舍入到偶数”。来自Wikipedia：

这种舍入到最近方法的变体也称为无偏舍入、收敛舍入、统计学家的舍入、荷兰语舍入、高斯舍入、奇偶舍入、庄家舍入或断舍入，以及广泛用于簿记。

这是 IEEE 754 计算函数和运算符中使用的默认舍入模式。

如果你想更好地控制它的舍入方式，你可以指定一个MidpointRounding 参数

Math.Round(0.125, 2, MidpointRounding.AwayFromZero) // 0.13