以下能够正确计算n!的程序是

A．Private Sub Command1 Click()　　　n=5：x=1　　　Do　　　　　x=x * I　　　　　I=I + 1 　　　Loop While I ＜ n　　　Print x　　End Sub

B．Private Sub Command1_Click()　　　n=5：X=1：I=1　　　Do　　　　X=X*I　　　　I=I + 1　　　Loop While I ＜n　　　Print x　　End Sub

C．Private Sub Command1_Click()　　　n=5：X=1：I=1　　　Do　　　　X=X * I　　　I=I + 1　　　Loop While I＜=n　　　Print X　　End Sub

D．Private Sub Command1_Click()　　　n=5：X=1：I=1　　　Do　　　　x=x * I　　　　I=I + 1　　　Loop While I＞n　　　Print X 　End Sub

丙类传染病有（）

A.百日咳

B.血吸虫病

C.包虫病

D.流行性脑脊髓膜炎

E.鼠疫