问题
单项选择题
在窗体上画一个名称为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
答案
参考答案：C
解析：
[分析]： 在f函数的过程中，“m M0d 2=0”为判断形参m是否为偶数的条件。当m为偶数时，通过函数名f返回原值；否则返回1。当控制变量i分别为1～5的函数调用计算过程中，变量s的计算过程为s=1+2+1+4+1=9。