【单选题】

在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程：

Private Function f(mAs Integer)
If m Mod 2=0 Then
f=m
Else
f=1
End If
End Function
Private SubCommand1_Click()
Dim iAs Integer
s=0
For i=1 To 5
s=s+f(i)
Next
Print s
End Sub
程序运行后，单击命令按钮，在窗体上显示的是______。
A．11
B．10
C．9
D．8