Private Sub Blck(x As Integer)
x=x * 2 + 1
If x < 6 Then
C.all Blck(x)
E.nd If
x=x * 2 + 1
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
[单选题]单击命令按钮,下列程序的执行结果是 Private Sub Blck (x As Integer) x = x * 2 + l If x <6 Then Call Blck(x) End If x = x * 2 + 1 Print x; End Sub Private Sub Commandl_Click() Blck 2 End SubA.23 47B.10 36C.22 44D.24 50
[单选题]单击命令按钮时,下列程序的执行结果是 Private Sub Book( x As Integer) x=x*2+1 If x<6 Then Call Book(x) End If x=x * 2 + 1 Print x; End Sub Private Sub Command2_Click( ) Book 2 End SubA.23 47B.10 36C.22 44D.24 50
[单选题]单击命令按钮执行下列程序,其输出结果是( )。Private Sub Command1_Click()D.im a As Integer,b As Integer,c As Integera=3b=4c=5Prim SecProc(c,b,A)E.nd SubF.unction FirProc(x As Integer,y As Integer,z As Integer)F.irProc=2*x+y+3*zE.nd FunctionF.unction SecProc(x As Integer,y
[单选题]单击命令按钮执行下列程序,其输出结果是( )。 Private Sub Command1_Click() Dim a As Integer, b As Integer, c As Integer a=3 b=4 c=5 Print SecProc(c, b,a)End Sub Function FirProc(x As Integer, y As Integer, z As Integer) FirProc=2*x+y+3*z End Function Function SecProc(x As
[单选题]单击命令按钮执行下列程序,其输出结果是。 Private Sub Commana1_Click() Dim a As Integer,b As Integer,c As Integer a = 3 b = 4 c = 5 Print SecProc(c,b,a) End Sub Function FirProc(x As Integer,y As Integer,z As Integer) FirProc = 2 * x + y + 3 * z End Function Function Sec
[单选题]单击命令按钮执行下列程序,其输出结果是( )。 Private Sub Command1_Click() Dim a As Integer, b As Integer, c As Integer a=3 b=4 c=5 Print SecProc(c,b,A)End Sub Function FirProc(x As Integer, y As Integer, z As Integer) FirProc=2*x+y+3*Z End Function Function SecProc(x As
[单选题]单击命令按钮时,下列程序的执行结果是Private Sub Commandl_Click()D.im a As Integer,b As Integer,c As Integera=3:b=4:c=5Print SecProc(c,b,A)End SubF.unction FirProc(x As Integer,y As Integer,z As Integer)F.irProc=2*x+y+3*zE.nd FunctionF.unction SecProc(x As Integer,y As
[单选题]单击命令按钮时,下列程序的执行结果是Private Sub Command1_Click()B.T 4E.nd SubPrivate Sub BT(x As Integer)x=x*2 + 1If x < 6 ThenC.all BT(x)E.nd Ifx=x 2Print x;E.nd SubA.15B.16C.17D.18
[单选题]单击命令按钮时,下列程序的执行结果是Private Sub Command1_Click()D.im a As Integer, b As Integer, c As Integera=3∶b=4∶c=5Print SecProc(c, b, a)E.nd SubF.unction FirProc(x As Integer, y As Integer, z As Integer)F.irProc=2 * x + y + 3 * z+2E.nd FunctionF.unction SecProc(
[单选题]单击命令按钮时,下列程序的执行结果是 Private Sub Command1_Click() Dim a As Integer,b As Integer,C As Integer a=3 b=4 c=5 Print SecProc(c,b,A)End Sub Function FirProc (x As Integer,y As Integer,z As Integer) FirProc=2 * x + y + 3 * z+2 End Function Function SecProc (x