单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click( )
Sum=0
For x=1 To 5
Call sub1(x，s)
Sum=Sun+s
Next x
Print Sun
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
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个文本框，然后编写如下程序： Option Base 1 Private Sub Form Click( ) Dim Arr(10)As Integer For i=6 T0 10 Arr(i)=i-3 Next i Text1.Text=Str(Arr(6)+Arr(Arr(6)+Arr(10))) End Sub 程序运行后，单击窗体，在文本框中显示的内容是______。
A．1
B．3
C．6
D．10
单项选择题
在窗体中添加一个命令按钮，名称为Command1，两个文本框名称分别为Text1、Text2，然后编写如下程序： Private Sub Command1_Click( ) Dim x As String，y As String，c As String，d As String x=Text1.Text : y=Text2.Text c=LCase(x) : d=UCase(y) Print c; d End Sub 程序运行后，在文本框Text1、Text2中分别输入AbC和efG，结果是______。
A．abeEFG
B．abcefg
C．ABCefg
D．ABCEFG
相关试题