单项选择题

阅读下列程序:
  Private Sub Command1_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