下面运行程序后,单击命令按钮,输出出的结果是【 】。Private Sub Command1_Click( )Dim a% (1 To 5) ,i%, sFor i = 1 To 5a(i) =iNexts = Fun(a)Print"s="; s;End SubFunction Fun(a() As Integer)Dim t, i%t=1For i = LBound(A0To UBound(a)t=t * a(i)NextFun =tEnd Function

下面运行程序后,单击命令按钮,输出出的结果是【 】。

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


相关考题:

窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是。Private Sub Command1_Click()Dim aa = Array(1,2,3,4,5)For K = 1 To 4 S = S + a(K)Next K Print SEnd SubA. 10 B. 14 C. 15 D. 120

窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是 Private Sub Commandl_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

(19)窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是 。 Private Sub Commandl_Click() Dim a a=Array(1,2,3,4,5) For k=1 To 4 S=S+a(k) Next k Print S End SubA.10 B.14 C.15 D.120

窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是( )。Private Sub Command1_Click()Dim aa=Array(1,2,3,4,5)For k=1 To 4S=s+a(k)Next kPrint sEnd SubA.10B.14C.15D.120

窗体上有一个命令按钮,命令按钮的单击事件过程如下: 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.10B.14C.15D.120

在窗体上画一个名为Commandl的命令按钮,编写如下程序:程序运行后,单击命令按钮,输出的结果是( )。A. 4B. 5C. 6D. 8

窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是 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 SubA.10B.14C.15D.120

窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是( )。 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 SubA.10B.14C.15D.120

在窗体上画一个名为Command1的命令按钮,编写如下程序:程序运行后,单击命令按钮,输出的结果是_________。