问题
单项选择题
在窗体上画一个名称为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
解析：[评析] 命令按钮事件过程中的For循环的作用是求函数f(i)(i介于1与5之间的整数)的返回值的和。函数f的作用是如果参数m的值是偶数，返回值就是m的值，如果是奇数，返回值就是1。而1到5之间的整数中共有3个奇数，两个偶数，故s=3*1+2+4=9。