设一个工程由两个窗体组成，其名称分别为Form1和Form2，在Form1上有一个名称为 Command1的命令按钮。窗体Form1的程序代码如下：
Private Sub Command1_Click()
Dim a As Integer
a=10
Call g(Form2，

A．Privas 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．用Shell函数可以调用能够在Windows下运行的应用程序
B．用Shell函数可以调用可执行文件，也可以调用Visual Basic的内部函数
C．调用Shell函数的格式应为；＜变量名＞＝Shell(……)
D．用Shell函数不能执行DOS命令