如果存在如下过程：　　Private Function FMax(a( )As Integer)　　　Dim First As Integer，Last As Integer，i As Integer　　　First=LBound(A) 　　　Last=UBound(A) 　　　Max=a(First)　　　For i=First To Last　　　　If a(i) ＞ Max Then Max=a(i)　　　Next i　　　FMax=Max　　End Function　　在窗体上添加一个命令按钮，然后编写如下事件过程：　　Private Sub Command1 Click( )　　　　ReDim m(1 To 4) As Integer　　　　m(1)=20：m(2)=30：m(3)=50：m(4)=100　　　　c=FMax(m)　　　　Print c　　End Sub　　单击命令按钮，其输出结果为【 】。

病人素有水饮，复感风寒，恶寒发热，无汗，咳喘痰多而稀，身体重痛，舌苔白滑，脉浮。治疗应选用（）

A.苓桂术甘汤

B.五苓散

C.小青龙汤

D.苏子降气汤

E.麻黄汤