单项选择题

阅读下列程序:
Private Sub Commad1_Click()
Dim i As Integer,k As Integer
k=2
For i=1 To 3
Print H(k)
Next i
End Sub
Function H(j As Integer)
a=0
Static b
a=a+1
b=b+1
H=a*b+j
End Function
程序运行后,单击命令按钮输出结果是

A.234
B.345
C.567
D.356