以下能够正确计算n!的程序是
A.Private Sub Command1_Chck( )
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=l
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=l
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=l
Do
x=x*i
i=i+1
Loop While i>n
Print x
End Sub