下列程序的功能是：将数据1，2，…，8写入顺序文件Num．txt中，请补充完整。　　Private Sub Form_Click() 　　　　Dim i As Integer　　　　Open"Num．txt"For Output As #1　　　　For i=1 To 8　　　　 【15】 　　　　Next i　　　　Close #1　　End Sub

患者男性，25岁，双眼红、痛伴分泌物增多3天就诊。自诉无明显诱因出现左眼异物感，刺痛伴大量水样分泌物，1天后右眼出现相同症状。体征：视力1．2（双眼），结膜充血（+++），近穹隆部明显，睑裂区结膜下见小片状出血，睑结膜 * * 增生（+）、滤泡（++），上睑结膜表面见膜性渗出物，剥离后创面少许渗血。角膜透明，荧光素染色下可见散在点状上皮脱失。眼部起病前2天有咽喉肿痛史，耳前淋巴结中度肿大。

为进一步明确诊断，进行结膜分泌物涂片染色，最可能见到的细胞类型是（）

A.嗜酸性粒细胞

B.多形核白细胞

C.包涵体

D.淋巴细胞

E.肥大细胞