单项选择题

请阅读程序:
  Option Base I
  Private Sub Form_ Click()
  Dim Arr(4, 4)As Integer
  For i=1 To 4
  For j=I To 4
  Arr(i, j)=(i - 1)*2+j
  Next j
  Next i
  
  For i=3To4
  For j=3 To 4
  Print Arr(j, i);
  Next j
  Print
  Next i
  End Sub
  程序运行后,单击窗体,则输出结果是()

A.
B.
C.
D.