用VB做：用DO...LOOP语句求1+2+...+100的值

i=1
Result=0
do while i=100
Result=Result+i
i=i+1
loop

DO : I=i+1 : j=j+i : IF i=100 then exit do :LOOP
j即为和。

没看清题目搞错了 不好意思阿 大家别笑话我 其实我也不懂 现在修改一下
dim i as intger
dim j as intger
i=1
j=0
do i = 100
j = i + j
i = i + 1
loop

哈哈~~
用VB做起来挺麻烦的嘛~~
C做快！