在窗体上画一个命令按钮Command1,编写事件代码如下: Private Sub Command1_Click() Dim al(4,4),a2(4,4) For i=1 To 4 For j=1 To 4 a1(

admin2013-03-30  36

问题 在窗体上画一个命令按钮Command1,编写事件代码如下:
    Private Sub Command1_Click()
    Dim al(4,4),a2(4,4)
    For i=1 To 4
    For j=1 To 4
    a1(i,j)=i+j
    a2(i,i)=a1(i,j)+i+j
    Next j
    Next i
    MsgBox(a1(3,3)*a2(3,3))
    End Sub
    程序运行后,单击命令按钮,消息框输出的是_________。

选项

答案72

解析 本题使用两重循环,为两个二维数组中的元素均进行了赋值,最后求两个数组元素值的积。当i=3,j=3时,a1(3,3)=3+3=6,a2(3,3)=a1(3,3)+3+3=12。本题最后结果为a1*a2=72。
转载请注明原文地址:https://kaotiyun.com/show/BZup777K
0

最新回复(0)