单项选择题

在窗体上画一个名称为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
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为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
单项选择题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim num Ag Integer num=1 Do Until num＞6 Print num: num=num+2.4 Loop End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是______。
A．13.45.8
B．135
C．1 4 7
D．无数据输出
相关试题