[单项选择题] 在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程； Private Function fun(ByVa

[单项选择题] 在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程； Private Function fun(ByVal m As Integer)If m Mod 2=0 Then fun=2Else fun=1End If End Function Private Sub Command1_C1ick()Dim i As Integer, s As Integers=0For i=1 To 5 s=s+fun(i)NextPrint s End Sub 程序运行后，单击命令按钮，在窗体上显示的是______。

A．6

B．7

C．8

D．9

B解析：[分析]： 子函数的功能为：当m为偶数时返回2，当m为奇数时返回1。1～5中有2个偶数，3个奇数，变量s的值为1+2+1+2+1=7。