单项选择题

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

<上一题目录下一题>

热门试题

单项选择题

填空题

阅读下列程序： 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 程序运行后，单击命令按钮输出结果是（ ）。