求VB编程2-100求和FOR DO WHILE都要FOR DO WHILE都分别要的哦

来源:学生作业学帮网 编辑:学帮网 时间:2024/05/31 06:27:41

求VB编程2-100求和FOR DO WHILE都要
FOR DO WHILE都分别要的哦

Function GetSumByFor() As Integer
Dim i As Integer, s As Integer
s = 0

For i = 2 To 100
s = s + i
Next

GetSumByFor = s
End Function
Function GetSumByWhile() As Integer
Dim i As Integer, s As Integer
i = 2
s = 0

Do While i