有以下程序：

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．813

B．013

C．712

D．00

颈部肿块在下列哪个部位应考虑甲状腺腺瘤（）

A.颈侧部

B.颌下区

C.颈前正中区随吞咽上下活动

D.颈前正中区随伸舌活动