![[填空题] 设有如下程序： Private Sub Form_Click() Dim a As Integer， s As Integer n=8 s=0 Dos=s+nn=n-1](http://www.mshxw.com/aiimages/31/251464.png "[填空题] 设有如下程序： Private Sub Form_Click() Dim a As Integer， s As Integer n=8 s=0 Dos=s+nn=n-1")
[填空题] 设有如下程序：
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
以上程序的功能是______。程序运行后，单击窗体，输出结果为______。
参考答案：
计算8+7+6+5+4+3+2+1 36问题解析:
本题考查考生对Do……While循环的掌握。Do……While循环是考试重点内容，非常灵活，考生务必掌握。题目比较简单，程序段的功能是实现1～8的累加，累加结果是36。
