单项选择题

在窗体上画一个名称为Command1的命令按钮,然后编写如下通用过程和命令按钮的事件过程:   Private Function f(m As Integer)    If m Mod 2 = 0 Then       f = m    Else       f = 1    End If   End Function   Private Sub Command1_Click()    Dim i As 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