Question

初级basic语言问题

i=2
sum=0
DO
sum=sum+i
i=i+2
WHILE i<100
sum=sum+i
i=i+2
WEND
PRINT sum
END
框图为初始数值i=2，sum=0，运算一次sum=sum+i，i=i+2，进入判断:如果i<100则返回sum=sum+i，i=i+2重新运算后再次进入判断，直至i≥100时结束判断输出sum值，结果输入以上语句到程序执行时提示WEND语句错误，请问以上语句哪里出错了？哪里替换语句会好？
我是个初学者，谢谢了

Answer 1

它与Do.....loop until语句的区别：while...wend语句不能使用Exit语句跳出循环
While...Wend 语句又称为当型语句，do......loop until则成为直到型

参考：
Sub求和() 　

Dim i As Long
Dim s As Integer
While s<=100
i=i+s 　　
s=S+1 　
Wend 　

Debug.Print”1至100的整数之和为：”＆i

Answer 2

Do ... Loop 是一对，While ... Wend是一对，你只有Do，没有Loop

Answer 3

i=2
sum=0
WHILE i<100
sum=sum+i
i=i+2
WEND
PRINT sum
END