单项选择题

有如下的函数过程：
Function Func2(a As Integer, b As Integer)’As Integer
Static m As Integer, i As Integer
m=0
i=2
a=i+m+1
b=i+a+b
Func2=m
End Function
在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim p As Integer, k As Integer, m As Integer
k=4
m=1
p=Fune2(k, m)
Print k; m
p = Func2(k, m)
Print k; m
End Sub
程序运行后，单击命令按钮，输出结果为( )。