血吸虫性肝硬化门脉高压出现较早且严重的原因是()

A．门静脉分支纤维化，管腔闭塞致窦前性阻塞

B．门静脉-肝静脉间吻合支形成

C．门静脉炎

D．门静脉血栓形成

E．窦后阻塞为主

有如下一个函数过程： Function Fun(a As Integer) Static cb=0：b=b+1：c=c+1Fun=a+b+c End Function 在窗体上添加一个命令按钮，事件过程如下： Private Sub Command1_Click() Dim a As Integera=2For i=1 To 3 Print Fun(a)；Next End Sub 运行该程序，单击命令按钮，输出结果是

A．4 4 4

B．4 5 6

C．6 7 8

D．4 7 9