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

来源：学生作业帮助网编辑：六六作业网时间：2024/05/16 04:39:35

a=8s=1dos=s+aa=a-1loopwhileaa=8s=1dos=s+aa=a-1loopwhileaa=8s=1dos=s+aa=a-1loopwhileaPrivateSubComman

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