VB.net 2010 视频教程 VB.net 2010 视频教程 python基础视频教程
SQL Server 2008 视频教程 c#入门经典教程 Visual Basic从门到精通视频教程
当前位置:
首页 > VB.net教程 >

  • VB.NET中四舍五入

一、使用math.round，真实结果是四舍六入五取偶，并不是真正的四舍五入
3.44   ---3.4  四舍
3.451  ---3.5 五后非零就进一
3.45   ---3.4  五后皆零看奇偶, 五前为偶应舍 去
3.75   ---3.8  五后皆零看奇偶,五前为奇要进一

3.46   ---3.5  六入

 

解决方案

1、2.0下使用

 

Dim ret2 As Double = Math.Round(2.5, MidpointRounding.AwayFromZero)

 

2、重构函数

 

3、偷懒方法

System.Math.Round(fshuzhi + 0.00000001)

 

 

修正后
3.45   ---3.5
3.46   ---3.5
4.44   ---3.4
即为5全部进


相关教程