单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Sum=0
For x=1 To 5
Call subl(x, s)
Sum=Sum+s
Next x
Print Sum
End Sub
Private Sub subl(y, w)
w=1
For i=1 To y
w=w*i
Next i
End Sub
程序运行后。单击命令按钮，则窗体上显示的内容是______。

A．5
B．120
C．153
D．160
<上一题 目录 下一题>
热门 试题

单项选择题
窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Optlon Base 1 Prlvete Sub Command1_Click() Dim s As Variant a=Array(1, 2, 3, 4, 5) Sum=0 For i=1 To 5 Sum=Sum_a(i) Next i X=Sum 5 For i=1 To 5 If a(i)＞x Then Print a(i); Next i End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是______。
A．1 2
B．1 2 3
C．3 4 5
D．4 5
单项选择题
在窗体上画一个名称为Commaudl的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程； Private Sub Command1_Click() n=Text1. Text Select Case n Case 1 To 20 x=10 Case 2, 4, 6 x=20 Case Is＜10 x=30 Case 10 x=40 End Select Text2. Text=x End Sub 程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是______。
A．10
B．20
C．30
D．40
相关试题