（ 24 ）有以下程序：

Option Base 1

D．im arr() As Integer

Private Sub Form_Click()

D．im i As Integer, j As Integer

ReDim arr(3, 2)

F．or i = 1 To 3

F．or j = 1 To 2

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

Next j

Next i

ReDim Preserve arr(3, 4)

F．or j = 3 To 4

arr(3, j) = j + 9

Next j

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

E．nd Sub

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

A． ） 8 13

B． ） 0 13

C． ） 7 12

D． ） 0 0