更多"单击命令按钮时，下列程序代码的执行结果为( )。 Private "的相关试题:
[单项选择]单击命令按钮时，下列程序代码的执行结果为( )。
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
[单项选择]单击命令按钮时，下列程序代码的执行结果为
Private Sub Command1_Click( )
Print MyFunc(24，18)
End Sub
Public Function MyFunc(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
My Func=m
End Function
A. 2
B. 4
C. 6
D. 8
[单项选择]单击按钮时，以下程序运行后的输出结果是( )。
Private Sub procl(X As Integer, y As Integer, z As Integer)
X=3*z
y=2*Z
z=x+y
End Sub
Private Sub Command1_Click（ ）
Dim x As Integer, y As Integer, z As Integer
x=1:y=2:z=3
Call procl(x, x, z)
Print x; x; z
Call procl(x, y, y)
Print x; y; y
End Sub
A. 6 6 12
B. 9 5 10
C. 9 6 12
D. 9 10 10
[单项选择]单击命令按钮时，下列程序代码的执行结果为
Public Sub Procl(n As Integer,ByVal m As integer)
n=n Mod 10
m＝m/10
End sub
Private Sub Commandl_Click（ ）
Dim x AS Integer,y AS Integer
x=12:y=24
Call Procl(x,y)
Print x;y
End sub
A. 12 24
B. 2 24
C. 2 3
D. 12 2
[单项选择]单击命令按钮时，下列程序代码的运行结果为
Private Sub Command1_Click（ ）
Print MyFunc(20, 18)
End Sub
Public Function MyFunc(m As Integer, n As Integer)As Integer
Do While m＜＞n
Do While m＞n:m=m-n:Loop
Do Whle m＜n:n=n-m:Loop
Loop
MyFunc=m
End Function
A. 0
B. 2
C. 4
D. 6
[单项选择]单击命令按钮时，下列程序代码的运行结果为( )。
Private Sub Command1_Click（ ）
print MyFunc(20，18)
End Sub
Public Function MyFunc (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
MyFunc=m
End FunCtion
A. Dim gg[1，5]As String
B. Dim gg[1 To 5，1 To 5]As String
C. Dim gg(1 To 5)As String
D. Dim gg[1：5，1：5]As String
[单项选择]单击命令按钮时，下列程序代码的执行结果为
Public Sub proc1(n As Integer，Byva1 m As Integer)
n=n Mod 10
m=m Mod 10
End Sub
Private Sub Cmmand1_Click( )
Dim x As Integer，y As lngeger
x=12：y=12
Call Proe1(x，y)
Print x；y
End Sub
A. 12 2
B. 2 12
C. 2 2
D. 12 12
[单项选择]单击命令按钮时，下列程序代码的执行结果为______。
PubUc Sub Procl(n As Integer,By Valm As InteSg)
n=n Mpd 10
m=m/10
End Sub
PHvate Sub Commandl Click（ ）
Dim X As Inte9er,y As Intger
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 Proe1 (n As Integer，ByVa1 m As Integer)
n=n Mod 10
m=m/ 10
End Sub
Private Sub Command1_Click（ ）
Dim x As Integer
Dim y As Integer
x= 12
y = 34
Call Proe1 (x, y)
Print x; 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/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
