ROUND 精度问题

最新推荐文章于 2024-04-26 15:34:28 发布

原创

最新推荐文章于 2024-04-26 15:34:28 发布 · 1k 阅读

0 ·

CC 4.0 BY-SA版权

MYSQL Round函

SELECT 
	25000000
	, 25000000/100000000   -- 0.25
	, ROUND(25000000/100000000,3)  -- 0.25
	, ROUND(25000000/10000000, 1)  -- 2.5
, ROUND(0.25+1,1)-1  -- 0.3
, ROUND(1.25,1)-1   -- 0.3
, ROUND(0.26,1)    -- 0.3
, ROUND(0.250006,0)  -- 0
, ROUND(250006,1)   -- 250006
,ROUND(21.5,0)     -- 22
,ROUND(21.25,1)   -- 21.3

数返回一个数值，该数值是按照指定的小数位数进行四舍五入运算的结果。可是当保留位跟着的即使是5，有可能进位，也有可能舍去，机会各50%。这样就会造成在应用程序中计算有误。下面这个函数能真正实现四舍五入功能，用以取代Round函数。

Public Function Round ToLarger(dblInputAsDouble,intDecimalsAsInteger) As Double
　　'执行Round()函数，有可能进位
　　'也有可能舍去

Dimstr Format String As String'格式化字符串’

如果是“0”，则返回“0”，否则进行适当的格式化:
　　If dblInput <>0 Then
　　strFormatString="#."&String(intDecimals,"#")
　　Round ToLarger=Format(dblInput,strFormatString)
　　Else
　　Round ToLarger=0
　　End If
　　End Function;