有如下一个函数过程: Function Fun(a As Integer) Static c b=0:b=b+1:c=c+1 Fun=a+b+c End Function 在窗体上添加一个命令按钮,事件过程如下: Private Sub Co

admin2010-11-20  26

问题 有如下一个函数过程:
Function Fun(a As Integer)
Static c
b=0:b=b+1:c=c+1
Fun=a+b+c
End Function
在窗体上添加一个命令按钮,事件过程如下:
Private Sub Command1_Click()
Dim a As Integer
a=2
For i=1 To 3
    Print Fun(a);
Next
End Sub
运行该程序,单击命令按钮,输出结果是

选项 A、4  4  4       
B、4  5  6       
C、6  7  8       
D、4  7  9

答案B

解析 题中c为静态变量,在每次子过程调用时,其值保持原值。计算过程为Fun=2+1+1=4、Fun=2+2+1=5、Fun=2+3+1=6。
转载请注明原文地址:https://kaotiyun.com/show/Y4mp777K
0

最新回复(0)