[填空题] 执行下面程序，第一行输出结果是【14】，第二行输出结果是47。 Option Explicit Private Sub Form_Click( ) Dim A As IntegerA=2Call Sub1 (A) End Sub Private Sub1 (x As Integer) x=x2+1 If x＜10 Then Call Sub1 (x) End If x=x2+1 Print xEnd Sub

参考答案：

● 参考解析

[命题目的]考查考生对过程调用的应用情况。[解题要点]递归是一种十分有用的程序设计技术。递归过程是在过程定义中调用(或间接调用)本过程的过程。递归过程的关键部分就是要子过程函数Sub1()被调用了多少次。当x=2时调用了第1次，当x=5时调用了第2次，当x=11时不再调用，退出之前分别按x=23和x=47输出。[考点链接]通用过程的调用和通用过程中的参数调用。