对于急性滤泡性结膜炎的鉴别诊断不包括（）。

A.流行性角结膜炎

B.沙眼

C.药物性结膜炎

D.干燥性角结膜炎

E.成人包涵体性角结膜炎

单击命令按钮时，下列程序代码的执行结果为 Public Sub Procl(n As Integer,ByVal m As integer) n=n Mod 10 m＝m\10 End sub Private Sub Commandl_Click() Dim x AS Integer,y AS Integer x=12:y=24 Call Procl(x,y) Print x;y End sub

A．12 24

B．2 24

C．2 3

D．12 2