流脑疑诊患者，发热3天，同时伴有咳嗽、咳痰，头痛、关节痛，周身乏力，曾抽搐3次，T39℃，P100次／分，无皮肤瘀点，颈强（+），血WBC20×10/L，需要鉴别的疾病有（）

A.肺炎链球菌脑膜炎

B.金葡菌脑膜炎

C.结核性脑膜炎

D.流行性乙型脑炎

E.以上均是

单击命令按钮时，下列程序的执行结果是（ ）。　　Private Sub Command1_Click()　　　Dim a As Integer，b As Integer，c As Integer　　　a=3　　　b=4　　　c=5　　　Print SecProc(c，b，a)　　End Sub　　Function FirProC(x As Integer，y As Integer，z As Integer)　　FirProc=2*s+y+3*z　　End Function　　Function SecProc(x As Integer，y As Integer，z As Integer)　　　SecProc=FirProc(z，x，y)+x　　End Function

A．20

B．22

C．28

D．30