VB简单程序编写：求1到100内可以被5或7整除的数之和

iTot = 0
For i = 1 To 100
If i Mod 5 = 0 Or i Mod 7 = 0 Then iTot = iTot + i
Next i
Print iTot
结果是:1680
【由于字数限制,去除了Sub,及变量定义】