[已解决]mod函数里有小数该如何解释

sixnu

VBA里10.5 mod 2.6 等于1呢，定义为被除数和除数先四舍五入，那样不是11除以3吗，余数应该是2，而不是1呀，我哪理解错了？

最佳答案

月排行榜 / 总排行榜

lisachen

2013-4-19 20:35

Mod 运算符来对两数作除法运算，但返回其余数而非商数。
如果两数中有一数为浮点数，该数会先被应该是五舍六入成整型后再进行运算。

10.4 mod 4        2
10.5 mod 4        2
10.6 mod 4        3
10.7 mod 4        3

跳转到最佳答案楼层

冠军欧洲2010

被除数是不是不四舍五入？

lisachen

Mod 运算符来对两数作除法运算，但返回其余数而非商数。
如果两数中有一数为浮点数，该数会先被应该是五舍六入成整型后再进行运算。

10.4 mod 4        2
10.5 mod 4        2
10.6 mod 4        3
10.7 mod 4        3

sixnu

lisachen 发表于 2013-4-19 20:35
Mod 运算符来对两数作除法运算，但返回其余数而非商数。
如果两数中有一数为浮点数，该数会先被应该是五舍 ...

要五舍六入吗？没听过的，都是四舍五入呀

lisachen

sixnu 发表于 2013-4-19 21:37
要五舍六入吗？没听过的，都是四舍五入呀

不信吗？运行下面一段试试
Sub test()
Dim i As Double
For i = 10.1 To 12 Step 0.1
Debug.Print i & " mod 4 :"; i Mod 4
Cells(i * 10 / 1 - 100, 1) = i & " mod 4"
Cells(i * 10 / 1 - 100, 2) = i Mod 4
Next i
End Sub

lisachen

sixnu 发表于 2013-4-19 21:37
要五舍六入吗？没听过的，都是四舍五入呀

VBA里10.5 mod 2.6 等于1呢，定义为被除数和除数先五舍 六 入，那样不是10除以3吗，是1呀

Sub test()
Dim i As Double
For i = 10.1 To 12 Step 0.1
Cells(i * 10 / 1 - 100, 1) = i & " mod 2.6"
Cells(i * 10 / 1 - 100, 2) = i Mod 2.6
Next i
End Sub

向前冲

见识了         

lyky53898

但是，11.5 mod 4 返回结果为0

猿某人

四舍六入五成双，10 mod 2.5 得0 ，10 mod 3.5 得2 ，小数<=4舍去，小数>=6进位，小数=5，进位是双才进位，进位是单舍去