男孩3岁，因反复全身多部位感染3年，间断发热8个月入院。曾发现左腋、腹股沟包块，肛周红肿，在外胸片提示"双侧肺门淋巴结结核"，抗结核治疗18个月，此间患"肺炎"1次。此后反复发热，咳嗽，咳痰，口腔溃疡，多次B超：肝脾大，有低密度阴影。外周血白细胞20．1×10⁹／L，Hb109g／L，PLT115×10⁹／L，IgG7．16g／L，IgA0．78g／L，IgM0．48g／L，NBT0％。

引起该病最常见的致病菌为（）

A.金黄色葡萄球菌

B.脑膜炎球菌

C.分枝杆菌

D.肺炎链球菌

E.不动杆菌

阅读下面的程序：
Private Sub Form_Click(
)
　　Dim Check， Counter
　　Check = True
　　Counter = 0
　　Do
　　　　Do While Counter ＜ 20
　　　　　　Counter = Counter + 1
　　　　　　If Counter = 10 Then
　　　　　　　　Check = False
　　　　　　　　Exit Do
　　　　　　End If
　　　　Loop
　　Loop Until Check = False
　　Print Counter， Check
End Sub
程序运行后，单击窗体，输出结果为________。

A．15　0

B．20　-1

C．10　True

D．10　False