至少用三种循环结构实现计算1+2+。。。+100的值。VB语言

楼上“蕗過de蓅暒”的3 个循环都有错误！更正一下：

①：'更正：end for

sum=0

for i=1 to 100

sum=sum+i

next

②： '更正：原来死循环

Sum = 0

Do

i = i + 1

Sum = Sum + i

Loop While i < 100

③：更正：While (i <= 100)

Sum = 0

i = 0

While (i < 100)

i = i + 1

Sum = Sum + i

Wend

我给你来一个第四种特殊循环吧！呵呵~

'---------------

a:
i = i + 1
sum = sum + i
If i < 100 Then GoTo a
MsgBox "总和为:" & sum

'------------------

①：

sum=0

for i=1 to 100

sum=sum+i

end for

②：

sum=0

do

i=i+1

sum=sum+i

loop

③：

sum=0

i=0

while(i<=100)

i=i+1

sum=sum+i

wend

for i = 1 to 100

s=s+i

next

''''''''''''''''''

i=1

s=0

do while i<101

s=s+i

i=i+1

loop

'''''''''''''''''''''''''''''

do until i>100

s=s+i

i=i+1

loop

''''''''''''''''