有如下的程序：Private Sub Command1_Click( )　Dim k As Integer，m As Integer　Dim P As Integer　k=4：m=1　P=Pid(k，m) ：Print P；　P=Pid(k，m) ：Print PEnd SubPrivate Function Pid(a As Integer，b As Integer)　Static m As Integer，i As Integer　m=5：i=2　i=i + m + 1　m=i + a + b　Pid=m\2End Function单击命令按钮后，输出结果为

A．2 2

B．4 4

C．5 5

D．6 6

除金融类上市公司外，上市公司发行新股所募集的资金不得投资于商业银行、证券公司等金融机构。( )