单项选择题

阅读下列程序: Private Sub Command1_Click() Dim i As Integer,k As Integer   k=2   For i=1 To 3     Print Fun(k);   Next End Sub Function Fun(j As 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