あしたは　あさ7じ(　　　)　わたしの　ところに　きてください。

A．まで

B．までが

C．までも

D．までに

有如下的程序：　　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