在窗体上画一个命令按钮,其名称为Commandl,然后编写如下事件过程: Privme Sub Commandl_Click() Dim al(4,4),a2(4,4) For i=1 To 4 Forj=1 To 4

admin2021-09-06  29

问题 在窗体上画一个命令按钮,其名称为Commandl,然后编写如下事件过程:
    Privme Sub Commandl_Click()
    Dim al(4,4),a2(4,4)
    For i=1 To 4
    Forj=1 To 4
    al(i,j)=i+j
    a2(i,j)=al(i,j)+i+j
    Nextj
    Next i
    MsgBox(al(3,3)*a2(3,3))
    End Sub
    程序运行后,单击命令按钮,消息框输出的是(    )。

选项 A、48
B、72
C、96
D、128

答案B

解析 本题考查VBA中二维数组和循环的知识。本题使用了二重循环为两个二维数组中的元素均进行了赋值,最后求两个数组元素值的积。我们只需要注意这两个数组元素在循环中被赋了什么值,当i=3,j=3时,alf3,3)=3+3=6,a2(3,3)=al(3,3)+3+3=12,所以最后二者之积为72。
转载请注明原文地址:https://jikaoti.com/ti/fB90FFFM
0

最新回复(0)