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

在窗体上画一个名称为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