问题详情

执行下面程序，第一行输出结果是 [ ] ，第二行输出结果是 [ ] 。
Option Explicit
Private Sub Form_Click()
Dim A As Integer
A=2
Call Sub1(A)End Sub
Private Sub1(x As Integer)
x=x*2+1
If x＜10 Then
Call Sub1(x)
End If
x=x*2+1
Print x
End Sub请帮忙给出正确答案和分析，谢谢！