【单选题】

阅读下列程序。

Private SubCommand1_Click()
Dim iAs Integer，kAs Integer
k=2
For i=1 To 3
Print Fun(k)；
Next
End Sub
Function Fun(jAs Integer)
Static b
a=0
a=a + 1
b=b + 1
Fun=a*b+j
End Function
程序运行后，单击命令按钮输出结果是
A．234
B．345
C．567
D．356