下面运行程序后,单击命令按钮,输出出的结果是【 】。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 a% (1 To 5 ”相关问题
  • 第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


    正确答案:B
    解析:考查考生对数组定义的掌握程度。
      [解题要点] Array函数在默认的情况下,数组的下标从O开始,所以s=a(1)+a(2)+a(3)a(4)=2+3+4+5=14
      [考点链接] 数组的定义、赋值和应用。

  • 第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


    正确答案:B
    解析:Array函数在默认的情况下,数组的F标从0开始,所以S=a(1)+a(2)+a(3)a(4)=2 +3+4+5=14

  • 第3题:

    在窗体上画一个名为Command1的命令按钮,编写如下程序:

    程序运行后,单击命令按钮,输出的结果是_________。


    正确答案:
    4
    【解析】本题考查了数组的嵌套使用。程序首先通过一个For循环给数组M的各个数组元素赋值,然后通过数组下标嵌套本身。注意:这样的嵌套时,要保证数组下标不出界,否则程序将出错。

  • 第4题:

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

    A. 4

    B. 5

    C. 6

    D. 8


    正确答案:A
    A)    【解析】本题考查数组中元素的分析。数组中的第k个元素的值为12-k,因此M(6)数据为6,M(8)为4。

  • 第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


    正确答案:B
    解析:使用Array函数为数组变量赋值,数组变量不能是具体的数据类型,只能是变体(Variant)类型,使用Array函数给数组变量赋值的3种形式如下:①显式定义为Variant变量(例如,Dim数组变量名As Variant):②在定义时不指明类型(例如,Dim数组变量名);③不定义而直接使用。