[填空题] 窗体上命令按钮Command1的事件过程如下: Private Sub Command1_Click() Dim total As Integer total=s(1)+s(2)

20 查阅

[填空题] 窗体上命令按钮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。

计算机考试