填空题

设有如下程序:
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的和。程序运行后,单击窗体,输出结果为______。

【参考答案】

36