请阅读程序：

Option Base1

Private Sub Form_Click()

Dim Arr(4，4)As Integer

For i=1 To 4

For j=1 To 4

Arr(i，j)=(i-1)*2+j

Next j

Next i

For i=3 To 4

For j=3 To 4

Print Arr(j，i);

Next j

Print

Next i

End Sub

 程序运行后，单击窗体，则输出结果是（）。

A．A

B．B

C．C

D．D