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

admin2017-12-13 56

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

本试题收录于：二级VB题库NCRE全国计算机二级分类