for循环1

来源:百度知道 编辑:UC知道 时间:2024/05/25 10:42:36
Private Sub Form_Click()
Dim i As Long
For i = 1 To 200
If i Mod 3 = 0 Or i Mod 7 = 0 Then
Sum = Sum + i ^ 2
End If
Next i
Print Sum
End Sub

1134490
-----------------------题目:求[1,200]之间,能被3或7整除的数的平方和----------------------------大家帮我看下对否?------------------

算法是对的,但sum没有定义,虽然可以执行,但最好养成一个好习惯,变量提前定义,以后无论学习其它编程还是用VB做更复杂的编程,都有好处的!

对的

答案是对的

算法没错,算法类的东西一般推荐写成函数。
变量定义很重要,尤其对大型编程。