单项选择题

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