窗体上有名称为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=LB

admin2018-10-18  22

问题 窗体上有名称为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://kaotiyun.com/show/xCFp777K
0

最新回复(0)