如果存在如下过程：　　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　　单击命令按钮，其输出结果为【 】。

一老年男性突发寒战、高热、右上腹疼痛。查体：肝大，右上腹触痛，胸片示右膈肌抬高，B超示右肝直径8cm无回声及低回声区，血白细胞升高并核左移，应首先考虑（）

A．急性肝坏死 

B．急性重症胆管炎 

C．阿米巴性肝脓肿 

D．细菌性肝脓肿 

E．肝癌