在窗体上画一个名称为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．340

C．9 7

D．死循环

负责某一行政区域内处方开具、调剂、保管相关工作的监督管理部门是

A．县卫生局

B．省卫生厅

C．县人民政府

D．省人民政府

E．县级以上地方卫生行政部门