在窗体上绘制一个名称为Command1的命令按,然后编写如下通用过程和命令按的事件过程: 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 Private Function fun(ByVal m As Integer) If m Mod 2 = 0 Then fun = 2 Else fun = 1 End Function 程序运行后,单击命令按,在窗体上显示的是( )