有下面程序代码: 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  22

问题 有下面程序代码:
    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://kaotiyun.com/show/3uGp777K
0

最新回复(0)