单项选择题

在窗体上画一个名称为Command1的命令按钮，并编写以下程序：
Private Sub Command1_Click()
Dim n%,b,t
t=1:b=1:n=2
Do
b=b*n
t=t+b
n=n+1
Loop Until n＞9
Print t
End Sub
此程序计算并输出一个表达式的值，该表达式是( )

A．9!
B．10!
C．1! +2! +…+9!
D．1! +2! +…+10!
<上一题 目录 下一题>
热门 试题

单项选择题
为达到把a、b中的值交换后输出的目的，某人编程如下： Private Sub Command1_Click() a%=10:b%=20 Call swap(a,b) Print a,b End Sub Private Sub swap(ByVal a As Integer，ByVal b As Integer) c=a:a=b:b=C End Sub 在运行时发现输出结果错了，需要修改。下面列出的错误原因和修改方案中正确的是( )
A．调用swap过程的语句错误，应改为Call swap a,b
B．输出语句错误，应改为Print"a","b"
C．过程的形式参数有错，应改为swap(ByRef a As Integer,ByRef b As Integer)
D．swap中3条赋值语句的顺序是错误的，应改为a=b:b=c:c=a
单项选择题
设窗体上有一个图片框Picture1，要在程序运行期间装入当前文件夹下的图形文件File1.jpg，能实现此功能的语句是( )
A．Picture1.Picture="Flie1.jpg"
B．Picture1.Picture=LoadPicture("File1.jpg")
C．LoadPicture("File1.jpg")
D．Call LoadPicture("File1.jpg")
相关试题