有如下程序：
Private Sub Command1_Click()
Dim k As Integer，m As Integer
Dim op As Integer
k=4：m=1
op：PPC(k，m)：Print op；
op：PPC(k，m)：Print op
End Sub
Private Function，PPC(a As Integer，b As Integer)
Static m As Integer，i As Integer
m=0：i=2
i=i+m+1
m=i+a+b
PPC=m
End Function
程序运行后，输出的结果为( )。