窗体上有名称为Command1的命令按钮,其事件过程如下: Option Base 1 Private Sub Command1—Click() Dim a Dim b(10)As Integer a=Array(2

admin2017-12-13  23

问题 窗体上有名称为Command1的命令按钮,其事件过程如下:
    Option Base 1
    Private Sub Command1—Click()
    Dim a
    Dim b(10)As Integer
    a=Array(2,4,7,3,9,6)
    For i=LBound(a)To UBound(a)
    b(i)=a(i)+i
    Sum=Sum+b(i)
    Next i
    Print Sum
    End Sub
运行程序,单击命令按钮时,窗体上显示的是(    )。

选项 A、44
B、46
C、50
D、52

答案D

解析 不同维数的数组缺省下界都是0或1,这取决于Option Base语句的设置。本题中有语句Option Base 1,所以LBound(A)=1,UBound(A)=6;For循环进行求和计算,结果为52,选D)。
转载请注明原文地址:https://jikaoti.com/ti/iwy0FFFM
0

最新回复(0)