单项选择题

设有命令按钮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+j
Next j
Next i
Sum=0
For i=1 To 3
Sum=Sum+a(i,4-i)
Next i
MsgBox Sum
End Sub
运行程序,单击命令按钮,消息框输出结果是______。

A.7
B.8
C.15
D.22