Dim a%(1 To 5, 1 To 5), t%(1 To 5), i As Integer, j As Integer
Picture1.Print "生成的原始矩阵为:"
For i = 1 To 5
For j = 1 To 5
a(i, j) = 5 * (i - 1) + j
Picture1.Print Tab(5 * (j - 1)); a(i, j);
Next j
Picture1.Print
Next i
Picture2.Print "变换后的矩阵为:";
For j = 1 To 5
t(j) = a(1, j)
Next j
For i = 1 To 4
For j = 1 To 5
a(i, j) = a(i + 1, j)
Next j
Next i
For j = 1 To 5
a(5, j) = t(j)
Next j
For i = 1 To 5
For j = 1 To 5
Picture2.Print Tab(5 * (j - 1)); a(i, j);
Next j
Picture2.Print
Next i
请问这段代码是什么意思呢?
谢谢好心人的详细解答!!