单项选择题

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

A) Private Sub Cornmand1_Click()
n=5:x=1
Do
X=X*i
i=i+1
Loop While icn
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 pn
Print X
End Sub

<上一题目录下一题>

热门试题

单项选择题

下列程序段的执行结果为( )。 a=3: b=1 For i=1 To 3 f=a+b：a=b：b=f Print f Next j

A) 4 3 6
B) 4 5 9
C) 6 3 4
D) 7 2 8

单项选择题

假定有下表所列的菜单结构：标题名称层次显示 appear 1(主菜单) 大图标 biaicon 2(子菜单) 小图标 smallicon 2(子菜单) 要求程序运行后，如果单击菜单项“大图标”，则在该菜单项前添加一个“√”。以下正确的事件过程是( )。

A) Private Sub bigicon_Click()
bigicon.Checked=False
End Sub
B) Private Sub bigicon_Click()
Me.appear.bigicon.Checked=True
End Sub
C) Private Sub bigicon_Click()
bigicon.Checked=True
End Sub
D) Private Sub bigicon_Click()
appear.bigiconChecked=True
End Sub