A．Dim abc as integer,num as singleB．Dim I%,N$as integer-找考题网

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

下列各组变量声明正确的是( )。