更多"单击命令按钮时，下列程序代码的执行结果为 Public Sub Pr"的相关试题:
[单项选择]单击命令按钮时，下列程序代码的执行结果为( )。 Private Sub Procl(nAs Integer,ByValmASInteger) n=nMod 10 m=m/10 End Sub PrivateSubCommandl_Click（ ） Dimx As Integer Dimy As Integer x=12 y=34 CallProcl(x，y) Printx；y End Sub
A. 12 34
B. 2 34
C. 2 3
D. 12 3
[单项选择]单击命令按钮时，下列程序代码的执行结果为______。Public Sub Procl (n As Integer，ByVal m As Integer) n= n Mod 10 m=m/10End SubPrivate Sub Conunand1_Click（ ） Dim x As Integer，y As Integer x=12：y=34 Call Procl(x，y) Print x；yEnd Sub
A. 12 34
B. 2 34
C. 2 3
D. 12 3
[单项选择]单击命令按钮时，下列程序段的执行结果为( )。 Public Sub Procl(n As Integer,ByVal m As Integer) n=n Mod 10 m=m/10 End Sub Private Sub Command1_Click（ ） Dim x As Integer,y As Integer x=12;y=34 Call Procl(x,y) Print x;y End Sub
A. 12 34
B. 2 34
C. 2 3
D. 12 3
[单项选择]单击命令按钮时，下列程序的执行结果是 Private Sub Commandl_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 x As Integer，y As Integer x=86：y=29 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. 6 29
C. 2 3
D. 12 3
[单项选择]单击命令按钮时，下列程序的执行结果为 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. 1232
B. 232
C. 23
D. 123
[单项选择]单击命令按钮时，下列程序的执行结果是( )。
Private Sub Commandl_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
[单项选择]单击命令按钮时，下列程序的执行结果为（ ）。
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. 1232
B. 232
C. 23
D. 123
[单项选择]单击命令按钮时，下列程序的运行结果为 Private Sub Command1_Click（ ） Print Fun(23,18) End Sub Public Function Fun(m As Integer，n As Integer)As Integer Do While m＜＞n Do While m＞n:m=m-n:Loop Do While m＜n:n=n-m:Loop Loop Fun=m End Function
A. 0
B. 1
C. 3
D. 5
[单项选择]单击命令按钮时，下列程序的执行结果是 Private Sub Command1_Click（ ） BT4 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
