[填空题] 执行下面程序，第一行输出结果是 (11) ，第二行输出结果是 (12) 。 Option Explicit Private Sub Form_C

[填空题] 执行下面程序，第一行输出结果是 (11) ，第二行输出结果是 (12) 。

Option Explicit

Private Sub Form_Click()

Dim A As Integer

　　A=2

　　Call Subl(A)

　　End Sub

Private Subl(x As Integer)

　　x=x*2+1

　　If x＜10 Then

　　　　Call Subl(x)

　　End If

　　x=x*2+1

　　Print x

End Sub

47

递归是一种十分有用的程序设计技术。递归过程是在过程定义中调用(或间接调用)本过程的过程。递归过程的关键部分就是要子过程函数Sub1()被调用了多少次。当x=2时调用了第一次，当x=5时调用了第二次，当x=11时不再调用，退出之前分别按x=23和x=47输出。