单项选择题

阅读程序：

Option Base 1

Dim arr() As Integer

Private Sub Form_Click()

Dim i As Integer，j As Integer

ReDim arr(3,2)

For i=1 To 3

For j=1 To 2

an(i,j) =i*2+j

Next

Next

ReDim Preserve an(3,4)

For j=3 To 4

an(3,j) =j+9

Next

Print arr(3,2) +air(3,4)

End Sub

程序运行后，单击窗体，输出结果为

点击查看答案&解析