[单项选择题] 有以下程序：Option Base 1Dim arr()As IntegerPrivate Sub Form

[单项选择题] 有以下程序：Option base 1Dim arr()As IntegerPrivate Sub Form_Click()Dim i As Integer,j As IntegerReDim arr(3,2) FOr i=1 To 3For j=1 To 2an"(i,J)=i*2+jNext j Next iReDim Preserve arr(3,4)For j=3 To 4arr(3,j)=j+9Next jPrint arr(3,2)；arr(3,4)End Sub程序运行后,单击窗体,输出结果为【 】

A．8 13

B．0 13

C．7 12

D．0 0

A

Option base 1语句使数组下标从开始。通过语句：Dim数组名(),可以声明一个动态数组,之后可以用ReDim语句重新定义动态数组的维数和所含元素个数,其一般格式为：ReDim[Preserve]数组名([下界 TO]上界[,[下界TO]上界])其中,在使用Preserve关键字保护数组中已有数据时,多维数组中只有最后一维的上限可以改变。 在第1次重新定义动态数组后,数组元素arr(3,2)的值等于；在第2次重新定义时,ReDim语句中使用了Preserve选择项,说明不清除数组内容,那么arr(3,2)的值仍为8,arr(3,4)在第2次重新定义后赋值为13。