有如下的程序：　　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 P　　End Sub　　Private 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\2　　End Function　　单击命令按钮后，输出结果为（ ）。

A． 2 2

B． 4 4

C． 5 5

D． 6 6

出口托收贷款适用于什么评级客户的付款交单方式（）。

A.BBB级以上

B.A级（含）以上

C.A级（不含）以上

D.AA级（含）以上