有下面程序代码： Private Sub Commandl—Click() a=Array(1，2，3，4，5，6，7，8，9，1 0) n=UBound(a) For k=0 To UBound(a)／2 Prin

admin2017-12-13 44

问题有下面程序代码：
Private Sub Commandl—Click()
a=Array(1，2，3，4，5，6，7，8，9，1 0)
n=UBound(a)
For k=0 To UBound(a)／2
Print a(k)*a(n)；
n=n—1
Next k
End Sub
程序运行后，单击命令按钮Command1，输出结果是( )。

选项 A、2 6 12 20 30
B、2 12 20 56 90
C、30 28 24 18 10
D、10 18 24 28 30

答案D

解析 UBound获取数组a的上标值，n=9。For循环边界为0至4。每次执行For的循环体时均会进行打印。选D)。

转载请注明原文地址:https://www.kaotiyun.com/show/3uGp777K

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