7,763
社区成员
发帖
与我相关
我的任务
分享Timer 溢出！急在线等待！！！
Private Sub Timer1_Timer()
For a = 0 To 9
Total = Total + Vote(a)
SR(a) = Vote(a) / Total
Next a
Total = 0
End Sub
想实时计算百分比，但是无论怎么样，只要程序已开始不给任何数字，只要运行到了除法马上就溢出，特别讨厌，不知道怎么实现
在线等待！
For a = 0 To 9
Total = Total + Vote(a)
SR(a) = Vote(a) / Total
Next a
Total = 0
End Sub
想实时计算百分比，但是无论怎么样，只要程序已开始不给任何数字，只要运行到了除法马上就溢出，特别讨厌，不知道怎么实现
在线等待！
...全文
请发表友善的回复…
发表回复
脆皮大雪糕 2005-10-16
- 打赏
- 举报
For a = 0 To 9
Total = Total + Vote(a)
if total <> 0 then SR(a) = Vote(a) / Total
Next a
Total = 0
Total = Total + Vote(a)
if total <> 0 then SR(a) = Vote(a) / Total
Next a
Total = 0
northwolves 2005-10-16
- 打赏
- 举报
你在调试窗口输个 ?0/0 就知道什么原因了
