填空题
执行下面的程序,单击命令按钮Command1后,窗体上显示的第一行内容是
1,第二行内容是
2,最后一行内容是
3。
Option Explicit
Private Sub Command1_Click()
Dim n As Integer
n=4
Print F1(n)
End Sub
Private Function F1(ByVal n As Integer)As Integer
Static x As Integer
If n<16 Then
n=n+10
F1=F1(n-4)+n
Else
F1=n
End If
x=2*x+1
Print F1, x
End Function