阅读下列程序： Private Sub Command1_Click() Dim

问题单项选择题

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

答案

参考答案：B

解析：在此题中，被调过程是一个函数过程，它有一个形式参数j，在被调过程声明中，定义了一个参数a，初值为0，一个静态变量b。语句a=a+1和b=b+1分别使a和b各增加1，然后返回H的值，因为b是静态变量，所以每次调用同一个参数k时，b会保留前次的数值，使输出结果变化，否则每次输出的结果都将是一样的。根据分析，第一次调用时a=1，b=1，Fun=3；第二次调用时a=1，b=2，Fun=4；第三次调用时a=1，b=3，Fun=5。所以最后的输出结果是345。