女，30岁。左下后牙食物嵌塞，临床：正位、过长，无对颌牙，引起食物嵌塞最可能的原因是（）

A.牙齿的食物外溢道消失

B.充填式牙尖

C.两牙边缘嵴高度不一致

D.上颌牙下垂

E.牙间 * * 退缩

在窗体上有一个命令按钮Command1，通用过程fun和命令按钮的事件过程如下：
Private Function fun(ByVal m As Integer)
If m Mod 2 = 0 Then
fun=2
Else
fun=1
End If
End Function
Private Sub Command1_Cliek()
Dim i As Integer, s As Integer
s=0
For i=1 To 5
s=s+fun(i)
Next
Print s
End Sub
程序运行后，单击命令按钮，则窗体上输出( )。

A．6

B．7

C．8

D．9