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