运行下面的程序,单击Cmd1,窗体上显示的第一行是(),第二行是() ,最后一行是()。
Option Explicit
Private Sub Cmd1_Click()
Dim A As Integer
A=3
Call Sub1(A)
Print A
End Sub
Private Sub 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
运行下面的程序,单击Cmd1,窗体上显示的第一行是(),第二行是() ,最后一行是()。 Option Explicit Private Sub Cmd1_Click() Dim A As Integer A=3 Call Sub1(A) Print A End Sub Private Sub 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