问题
填空题
设有如下程序:
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。