![[填空题] 设有如下程序： Private Sub Form_Click() Dim a As Integer，s As Integern=8：s=0Do s=s+n:n=n-1Loop Whi](http://www.mshxw.com/aiimages/31/258999.png "[填空题] 设有如下程序： Private Sub Form_Click() Dim a As Integer，s As Integern=8：s=0Do s=s+n:n=n-1Loop Whi")
[填空题] 设有如下程序：
Private Sub Form_Click()
Dim a As Integer，s As Integer
n=8：s=0
Do
s=s+n:n=n-1
Loop While n＞0
Print s
End Sub
以上程序的功能是计算1到8的和。程序运行后，单击窗体，输出结果为 【12】 。
参考答案：
36问题解析:
Do…While语句的循环运算次数为8次，当n减小到0时跳出循环。所以经运算s=1+2+3+4+5 +6+7+8，其结果为36。
