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

来源：学生作业学帮网 编辑：学帮网 时间：2024/06/25 09:21:32

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