问答题

有如下程序，运行时输出的结果是 ______。
Option Base 1
Private Sub Command1_Click()
Dim a(3,3) As Integer
For m=1 To 3
For n=1 To 3
a(m-1，n-1)=m+n+1
Next n
Next m
For m=0 To 2
For n=0 To 2
Print a(n,m)；
Next n
Print
Next m
End Sub