以下程序输出的结果是（  ）。  

Option Base 1

Private Sub Command1 Click()

    Dim a%(3,3)

    For i=1 To 3

        For j=1 To 3

            a(i,j)=i*j

            Print a(i,j);〃〃;

        Next j

        Print

    Next i

End Sub

A、

B、

C、

D、