窗体的单击事件过程如下: Private Sub Form_Click() Dim a(5, 5) As Integer For i = 1 To 5 For j = 1 To 5 a(i, j) =

admin2015-10-23  37

问题 窗体的单击事件过程如下:
Private Sub Form_Click()
    Dim a(5, 5) As Integer
    For i = 1 To 5
        For j = 1 To 5
            a(i, j) = i * 2 + j
            If i = j Then
                Sum = Sum + a(i, j)
            End If
        Next j
Next i
Print Sum
End Sub
以下关于上述程序的叙述中,错误的是

选项 A、输出结果是数组a中各元素值之和
B、数组a默认的行、列最小下标均为0
C、a(4,3)的值是11
D、a(2,4)的值是8

答案A

解析 程序主要是对二维数据a(5,5)进行赋初值,再求其对角线上数值和sum,最后将结果输出到变量sum中,故选项A表述错误。根据数组定义,数组a(5,5)默认的行、列最小下标为0,故B项正确。根据语句 a(i, j) = i * 2 + j,a(4,3)=4*2+3=11,a(2,4)=2*2+4=8,故选项C和D表述正确。
转载请注明原文地址:https://kaotiyun.com/show/6ULp777K
0

最新回复(0)