单项选择题

有如下程序：　　Private Sub Command1_Click()　　　　Dim k As Integer，m As Integer　　　　Dim p As Integer　　　　k=4：m=1　　　　p=PC(k，m)：Print p；　　　　p=PC(k，m)：Print p　　End Sub　　Private Function PC(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　　　　PC=m　　End Function　　程序运行后，输出的结果为