下面运行程序后,单击命令按钮,输出出的结果是【 】。
Private Sub Command1_Click( )
Dim a% (1 To 5) ,i%, s
For i = 1 To 5
a(i) =i
Next
s = Fun(a)
Print"s="; s;
End Sub
Function Fun(a() As Integer)
Dim t, i%
t=1
For i = LBound(A0To UBound(a)
t=t * a(i)
Next
Fun =t
End Function
第1题:
窗体上有一个命令按钮,命令按钮的单击事件过程如下: Private Sub Command1_Click() Dim a a=Array(1,2,3,4,5) For k=1 To 4 s=s+a(k) Next Print S End Sub 运行程序后,单击命令按钮,输出结果是
A.10
B.14
C.15
D.120
第2题:
窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是 Private Sub Command1_Click( ) Dim a a = Array(1,2,3,4,5) For k = 1 To4 s=s+a(k) Next Print S End Sub
A.10
B.14
C.15
D.120
第3题:
在窗体上画一个名为Command1的命令按钮,编写如下程序:
程序运行后,单击命令按钮,输出的结果是_________。
第4题:
在窗体上画一个名为Commandl的命令按钮,编写如下程序:程序运行后,单击命令按钮,输出的结果是( )。
A. 4
B. 5
C. 6
D. 8
第5题:
窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是( )。 Private Sub Command1_Click() Dim a a=Array(1, 2, 3, 4, 5) Fork= 1 To 4 s=s+a(k) Next k Print s End Sub
A.10
B.14
C.15
D.120