Question

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

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

Answer 1

Private Sub Command1_Click()

Dim a(8, 8) As Integer

For i = 1 To 8

For j = 1 To 8

a(i, j) = -5 * (i >= j)

Debug.Print a(i, j);

Next j

Debug.Print

Next i

End Sub