选择题
4. 编写如下程序:
Private Sub Command1_Click()
Dim a(5, 3)As Integer
Dim i As Integer, j As Integer
For i=1 To 3
For j=1 To 3
If i>1 And j>1 Then
a(i, j)=a(a(i-1, j-1), a(i, j-1))+1
Else
a(i, j)=i*j
End If
Next j
Next i
For i=1 To 3
For j=1 To 3
Print a(i, j);
Next j
Print
Next i
End Sub
程序运行后,单击命令按钮Command1,输出结果为______。