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

admin2018-05-08  25

问题 窗体上有名称为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/NQy0FFFM
0

最新回复(0)