有些讲法四舍五入,有些讲四舍六入,谁的讲法是对的
vbä¸Roundå½æ°ï¼æ¯è¿åä¸ä¸ªæ°å¼ï¼è¯¥æ°å¼æ¯æç
§æå®çå°æ°ä½æ°è¿è¡åèäºå
¥è¿ç®çç»æã
è¯æ³ Round(expression [,numdecimalplaces])
expression å¿
éçãè¦è¿è¡åèäºå
¥è¿ç®çæ°å¼è¡¨è¾¾å¼ã
numdecimalplaces å¯éçãæ°åå¼ï¼è¡¨ç¤ºè¿è¡åèäºå
¥è¿ç®æ¶ï¼å°æ°ç¹å³è¾¹åºä¿ççä½æ°ãå¦æ忽ç¥ï¼åRoundå½æ°è¿åæ´æ°ã
ä¾åï¼
Dim a As Doublea = 2.55
Print Round(a, 1)
è¿åç»ææ¯ï¼2.6
a = 3.1415926
Print Round(a, 6)
è¿åç»ææ¯3.141593
温馨提示:答案为网友推荐,仅供参考
第1个回答 推荐于2017-09-27
这个问题还真不好回答:我做的实验如下:
Dim a As Single
a = 2.5
Print Round(a)
结果是2
Dim a As Double
a = 2.5
Print Round(a)
结果是2
-------------------------------------------------------------------------------
Dim a As Single
a = 2.55
Print Round(a, 1)
结果是2.5
Dim a As Double
a = 2.55
Print Round(a, 1)
结果是2.6
----------------------------------------------------------------------------------
而 MSDN里的解释 如下:
Round函数
描述
返回一个数值,该数值是按照指定的小数位数进行四舍五入运算的结果。
语法
Round(expression [,numdecimalplaces])
Round函数语法有如下几部分:
部分
描述
expression
必需的。要进行四舍五入运算的数值表达式。
numdecimalplaces
可选的。数字值,表示进行四舍五入运算时,小数点右边应保留的位数。如果忽略,则Round函数返回整数。追问
Dim a As Single
a = 2.5
Print Round(a)
结果是2
Dim a As Double
a = 2.5
Print Round(a)
结果是2
-------------------------------------------------------------------------------
Dim a As Single
a = 2.55
Print Round(a, 1)
结果是2.5
Dim a As Double
a = 2.55
Print Round(a, 1)
结果是2.6
----------------------------------------------------------------------------------
而 MSDN里的解释 如下:
Round函数
描述
返回一个数值,该数值是按照指定的小数位数进行四舍五入运算的结果。
语法
Round(expression [,numdecimalplaces])
Round函数语法有如下几部分:
部分
描述
expression
必需的。要进行四舍五入运算的数值表达式。
numdecimalplaces
可选的。数字值,表示进行四舍五入运算时,小数点右边应保留的位数。如果忽略,则Round函数返回整数。追问
老鸟你又出来了,我相信四舍五入,不过百度知道有好多人讲四舍六入。
VB就四舍六入
VBA就四舍五入
越看越糊涂