问题 单项选择题

在窗体上绘制一个名称为Command1的命令按钮,然后编写如下通用过程和命令按钮的事件过程: Private Function fun(ByVal m As Integer)   If m Mod 2=0 Then     fun=2   Else     fun=1   End If End Function Private Sub Command1_Click()   Dim i As Integer,s As Integer   s=0   For i=1 To 5     s=s+fun(i)   Next   Print s End Sub 程序运行后,单击命令按钮,在窗体上显示的是( )。

A.6

B.7

C.8

D.9

答案

参考答案:B

单项选择题
单项选择题