a=8 s=1 do s=s+a a=a-1 loop while a

来源：学生作业帮助网编辑：作业帮时间：2024/04/25 10:23:14

a=8 s=1 do s=s+a a=a-1 loop while a
a=8 s=1 do s=s+a a=a-1 loop while a

a=8 s=1 do s=s+a a=a-1 loop while a
Private Sub Command1_Click()
a = 8
s = 1
Do
s = s + a
a = a - 1
Loop While a