知道答案的进来关于vb

i = 1,s= 0
事实上程序一进入循环就退出来了.

变量的初始值就是零.

Private sub command1-click()
i=0
's=0, i=0

Do
s=i+s
's=0, i=0

i=i+1
's=0, i=1

Loop until i>=4s
'1>=0 结束

's=0, i=1

End sub

详细.

s的初始值你没说,那就是0
一进去就结束了

你这个程序应该把 4s 改为 4*s

因为一开始变量没赋值默然为0

要是按你的那个4s是没有值的。。。程序出错。。。

按4*s答案就是i=1, s=0