Private Sub Blck(x As Integer)
x=x * 2 + 1
If x < 6 Then
C.all Blck(x)
E.nd If
Print x;
E.nd Sub
Private Sub Command1_Click()
B.lck 2
E.nd Sub( )。
A.23 47
B.10 36
C.22 44
D.24 50