甲型肝炎在消毒的同时还应开展的工作是 （）

A.灭鼠

B.灭蚊

C.灭蝇及灭蟑螂

D.灭蚤

E.灭螨

有如下事件过程：　　Private Sub Command1_Click( )　　　　Dim m AS Integer，n AS Integer　　　　m=2：n=1　　　　Print "m="；m；"n="；n　　　　Call TOD(m，n)　　　　Print "m="；m；"n="；n　　End Sub　　Sub TOD(x，y)　　　　x=x^2　　　　y=y^3　　End Sub 　　程序运行后，输出的结果为()。

A．m=2，n=1　　m=1，n=2

B．m=2，n=1　　m=4，n=1

C．m=1，n=2　　m=1，n=4

D．m=1，n=2　　m=2，n=4