填空题 执行下面的程序,单击命令按钮Command1后,则数组元素A(2,1)的值是 1,A(3,1)的值是 2,A(3,3)的值是 3,第一行的输出内容是 4
Private Sub Command1_Click()
Dim A(3, 3) As Integer, I As Integer, J As Integer, K As Integer
I=1:J=3
K=1
A(I, J)=K
For K=2 To 9
If I+1<=3 And J+1<=3 Then
I=I+1
J=J+1
ElseIf I+1>3 Then
I=1
J=J-1
Elself J+1>3 Then
J=1
I=I+1
End If
A(I, J)=K
Next
For I=1 To 3
For J=1 To 3
Print Left(A(I, J)&String(3, "0"), 3);
Next
Print
Next
End Sub
【正确答案】
【答案解析】2 9 6 400700100