自信通常来自于成功，应尽量给自卑的学生安排一些他们能很好地完成的任务。

在窗体上画—个名称为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．死循环