单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
　　　 Private　Sub　Command1＿Click(　)
　　　　 Dim a As Integer，s As Integer
　　　　 a＝8
　　　　 s＝1
　 　　　 Do
S=s+a
a=a-1
Loop While a<=0
Prim s，a
End Sub
程序运行后，单击命令按钮，则窗体上显示的内容是

点击查看答案&解析