用while循环语句求出1+2+3.+100的和

来源:学生作业学帮网 编辑:学帮网 时间:2024/05/17 02:40:44

用while循环语句求出1+2+3.+100的和

Sub aaa()
i = 0
While i < 101
a = a + i
i = i + 1
Wend
Debug.Print a
End Sub
Sub bbb()
i = 0
Do While i < 101
a = a + i
i = i + 1
Loop
Debug.Print a
End Sub
Sub ccc()
For i = 1 To 100
a = a + i
Next
Debug.Print a
End Sub