永发信息网

vb 函数除法余数

答案:5  悬赏:30  手机版
解决时间 2021-04-07 12:04
  • 提问者网友:最美的风景
  • 2021-04-07 06:34
vb 函数除法余数
最佳答案
  • 五星知识达人网友:舊物识亽
  • 2021-04-07 07:06
VB中使用MOD运算求两个整数相除的余数:
例如:求27除以5的余数,最简单的方法是
27 Mod 5 就可以了。

也可以用
27 - 27 \ 5 * 5 来求得。
其中 \ 是整数除法的运算符。27 \ 5 的值就等于27除以5的商的整数部分(19 \ 10 = 1)
即是5。由于 \ 和 * 的运算优先组长相同,所以,
27 - 27 \ 5 * 5
=27 - 5 * 5
=27 - 25
=2
全部回答
  • 1楼网友:忘川信使
  • 2021-04-07 09:49
用得着这样子?
除法求余
任意的除法只要除数不为0结果都是为商和余数
所以只要一个存商一个存余数的text就可以了!
=============================
没有除不尽的余数,这话怎么理解?
不是除法,会有除不尽的时候?
你话话自相矛盾
  • 2楼网友:酒醒三更
  • 2021-04-07 09:03
直接用c = a Mod b就可以求出a/b的余数c
  • 3楼网友:时间的尘埃
  • 2021-04-07 08:07
不知楼主是不是这个意思:将一个数分成几份,但最后一个不是平均数。比如10000,就可以分成3333、3333、3334。也就是说前面都平均,最后一个把余数加上。
如果不是这样,会有许多种分法,比如5000,4000,1000;2000,6000,2000等等,这样的话需要一个分配比例,但最后一个数仍然会出现余数问题。
如果我的理解和楼主一样,是可以实现的。
  • 4楼网友:轮獄道
  • 2021-04-07 07:52
我的代码就是前面都平均,最后一个把余数加上。就像3333、3333、3334
你可以吧10000,变成变量呀比如:
Private Sub Command1_Click()
Dim i As Long
For i = 0 To 19
Text2(i) = Text1 \ 20
Next i
Text2(y) = Val(Text2(y).Text) + Text1 Mod 20
End Sub
text1 是是要被分的数,比如刚刚的10000
你连举一反三都不会吗???
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯