vb 编程计算100~300之间所有能被3和7整除的数之和,求代码_其他解答

vb 编程计算100~300之间所有能被3和7整除的数之和,求代码

人气：225 ℃　时间：2019-08-20 22:06:51

解答

Sum = 0
For i = 100 To 300
If i Mod 21 = 0 Then
Sum = Sum + i
End If
Next
==>
优化一点：
Sum = 0
For i = 100 To 300
If i Mod 21 = 0 Then
Sum = Sum + i
i = i + 20
End If
Next