阅读程序：Option Base 1Dim arr()As IntegerPriva

问题：

阅读程序：

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

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

Next j

Next i

ReDim Preserve arr(3,4)

For j=3 To 4

arr(3,j)=j+9

Next j

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

End Sub

程序运行后，单击窗体，输入结果为（）。

A．21

B．13

C．8

D．25