单项选择题

在窗体上画一个名称为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的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim x(5)As String Dim n AS Integer For n ： 4 TO 0 Step -1 x(n)= n + 1 Print x(n)； Next n End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是
A．54321
B．4
C．54321
D．0
单项选择题
窗体上有一个命令按钮Command1和一个列表框List1，其中List1有0、1、2、3、4的内容，有下列程序： Private Sub Command1_Click() Dim i，s For i=0 To List1．ListCount s=s+List1．List(i) Next i Print s End Sub 程序运行后，单击命令按钮，则窗体上显示的是
A．0
B．10
C．01234
D．程序出错
相关试题