在窗体上有一个命令按钮Command1，通用过程fun和命令按钮的事件过程如下：
Private Function fun(ByVal m As Integer)
Ifm Mod2=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
Prints
End Sub
程序运行后，单击命令按钮，则窗体上输出( )。