更多"单击命令按钮时,下列程序的执行结果为 Private Sub Co"的相关试题:
[单项选择]单击命令按钮时,下列程序的执行结果是 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 Fir Proc(x As Integer,y As Integer,z As Integer) Fir Proc=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( ) Dim x As Integer,y As Integer x=12:y=32 Call Proc(x,y) Print x;y End Sub Public Sub Proc(n As Integer,ByVal m As Integer) n=n Mod 10 m=m Mod 10 End Sub
A. 12 32
B. 2 32
C. 2 3
D. 12 3
[单项选择]单击命令按钮时,下列程序的执行结果是 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 Command1_click( )
Dim X As Integer,Y As Integer
x=12:y=32
Call PCS(x,y)
Print x;y
End Sub
Public Sub PCS(ByVal n As Integer,ByVal m As Integer)
n=n Mod 10
m=m Mod 10
End Sub
A. 12 32
B. 2 32
C. 2 3
D. 12 3
[单项选择]单击命令按钮时,下列程序的执行结果是 Private Sub Book(x As Integer) x=x * 2 + l If x<6 Then Call Book(x) End If X=X * 2 + 1 Print x; End Sub Private Sub Command2_Click( ) Book2 End Sub A) 23 47
B) 10 36
C) 22 44
D) 24 50
[单项选择]单击命令按钮时,下列程序的执行结果是
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 Commandl_Click( )
Dimx As Integer,y As Integer
x=12: y=32
CallPCS(x,y)
PrintX;y
End Sub
PubUc Sub PCS(ByValn As Integer,ByValm As Integer)
n=nMod 10
m=mMod 10
End Sub
A. 1232
B. 232
C. 23
D. 123