问题详情

阅读下列程序：
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)
Static b
a=0
a=a+1
b=b+1
H=a*b+j
End Funmion
单击命令按钮，执行程序，输出结果是()。
A．2 3 4
B．3 4 5
C．5 6 7
D．3 5 6