病人哮证日久，反复发作，发时喉中痰鸣如鼾，声低，气短不足以息，咳痰清稀，面色苍白，汗出肢冷，舌淡白，脉沉细者，治宜选用

A．苏子降气汤
B．七味都气丸
C．射干麻黄汤
D．金匮肾气丸

阅读程序：

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