在窗体上画一个名称为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
　　print s,a
End Sub
程序运行后，单击命令按钮，则窗体上显示的内容是( )。

A．7 9

B．34 0

C．9 7

D．死循环