更多"单击命令按钮时,下列程序的执行结果是 Private Sub Boo"的相关试题:
[单项选择]单击命令按钮,下列程序的执行结果是 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 Sub
A. 23 47
B. 10 36
C. 22 44
D. 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 Sub
A. 23 47
B. 10 36
C. 22 44
D. 24 50
[单项选择]单击命令按钮时,下列程序的执行结果是
Private Sub Commandl_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 Integer,y As Integer,z As Integer)
SecProc=FirProc(z,x,y) +x
End Function
A. 20
B. 22
C. 28
D. 30
[单项选择]单击命令按钮时,下列程序的执行结果是
Private Sub Command1_Click( )
BT 4
End Sub
Private Sub BT(x As Integer)
x=x*2+1
If x<6 Then
Call BT(x)
End If
x=x*2
Print x;
End Sub
A) 15 B) 16
C) 17 D) 18
[单项选择]单击命令按钮时,下列程序的执行结果是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 SubFunction FirProC(x As Integer,y As Integer,z As Integer) FirProc=2*s+y+3*zEnd FunctionFunction SecProc(x As Integer,y As Integer,z As Integer) SecProc=FirProc(z,x,y)+xEnd Function
A. 20
B. 22
C. 28
D. 30
[单项选择]单击命令按钮时,下列程序的执行结果是( )。
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 As Integer,y As hteger,z As Integer)
SecProc=FirProc(z,x,y)+x+7
End Function
A. 20
B. 25
C. 37
D. 32