患者，男性，23岁，工人，操作机器时被飞出的异物碰伤左面部2小时，伤后无昏迷，神志清，查体合作，步入诊室。查体见，左外眦下方至左下颌角皮肤呈直线型裂开，深达肌层，创面可见渗血、无搏动性出血。张口无明显受限、下颌运动尚可。

如欲检查有无腮腺损伤，以下哪些方法最为有效（）

A.从口内腮腺导管口插入塑料管，了解导管情况

B.从腮腺导管口注入亚甲蓝

C.腮腺造影

D.MRI

E.CT

有如下一个函数过程：
Function Fun(a As Integer)
Stcitic C
b=0:b=b+1:c=c+1
Fu n=a+b+c
End Function
在窗体上添加一个命令按钮，事件过程如下：
Private Sub Command1_Click()
Dim a As Integer
a=2
For 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