Question

VB考试编程题目:生成一个8*8的二维数组，这个数组是一个左下角元素为5

VB考试编程题目:生成一个8*8的二维数组，这个数组是一个左下角元素为5，对角线元素也是5，其他元素为0的矩阵，按矩阵格式在立即窗口打印出来。

Answer 1

Private Sub Form_DblClick()
Dim a(7, 7) As Integer
Dim i As Integer
Dim j As Integer
For i = 0 To 7
For j = 0 To 7
If i + j = 7 Or i = j Then
a(i, j) = 5
Else
a(i, j) = 0
End If
Debug.Print a(i, j);
Next
Debug.Print
Next
End Sub