问题
填空题
窗体上命令按钮Command1的事件过程如下:
Private Sub Command1_Click()
Dim total As Integer
total=s(1)+s(2)
Print total
End Sub
Private Function s(m As Integer)As Integer
Static x As Integer
For i=1 To m
x=x+1
Next i
S=x
End Function
运行程序,第3次单击命令按钮Command1时,输出结果为______。
答案
参考答案:P
解析: 由于x是静态变量,会保存上次调用时的值,第一次单击:s(1)=1,m=1,x=0→1;s(2)=3,m=2,x=1→2→3。第二次单击:s(1)=4,m=1,x=3→4;s(2)=6,m=2,x=4→5→6。第三次单击:s(1)=7,m=1,x=6→7;s(2)=9,m=2,x=7→8→9。第三次单击结果为total即s(1)+s(2)=7+9=16。