在窗体上画一今名称为Command1的命令按钮，然后编写如下事件过程： Priva
题型：单项选择题
问题：
在窗体上画一今名称为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．79
B．340
C．97
D．死循环