单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub subl(ByVal x As Integer, ByVal y As Integer, ByVal z As Integer)
z=x*x+y*y
End Sub
Private Sub Command1_Click()
Dim a As Integer
a=8
Call subl(1, 2,

A．
&nb
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为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
相关试题