[填空题] 设有如下程序： Private Sub Form_Click( ) Dim a As Integer，s As Integer n=8 S=0 DO S=S+n n=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 SEnd Sub以上程序的功能是 【10】 。程序进行后，单击窗体，输出结果为 【11】 。