单项选择题

设有命令按钮Command1的单击事件过程，代码如下：
Private Sub Command1_Click()
Dim a[3,3) As Integer
For i=1 To 3
For j=1 To 3
a(i,j):i*j+i
Next j
Next i
Sum=0
For i=1 To 3
Sum=Sum+a(i,4-i)
Next i
Print Sum
End Sub
运行程序，单击命令按钮，输出结果是( )。