求中国习惯列的"四舍五入"函数
如题,谢谢! 问题点数：20、回复次数：3Top
1 楼rzpc（淡蓝色）回复于 2005-06-03 19:54:50 得分 10
方法一:用System.Math.Round方法
例1:把8.33四舍五入保留小数点后5位:
Dim dblT As Double = Math.Round(8.33#,5)
此时dblT的值为8.33
例2:把3.1415926四舍五入保留小数点后4位:
Dim dblT As Double = Math.Round(Math.PI, 4)
此时dblT的值为3.1416
方法二:用ToString方法
例1:把1.447888四舍五入保留小数点后3位:
Dim dblSrc As Double = 2.188888#
Dim strResult as String = dblSrc.ToString("F3")
此时:strResult = "2.189"
例2:把它四舍五入保留小数点后5位,但要保证小数点前有3位,不足的用零补齐
Dim dblSrc As Double = 2.188#
Dim strResult as String = dblSrc.ToString("000.00000")
此时:strResult = "002.18800"Top
2 楼pupo（泡泡）回复于 2005-06-03 19:57:20 得分 10
自己写一个吧。微软的没有现成的Top
3 楼jerry_yuan（jerry）回复于 2005-06-03 19:58:55 得分 0
来迟了
楼上正解Top
