更多"单击按钮时，以下程序运行后的输出结果是 Private Sub Com"的相关试题:
[单项选择]单击按钮时，以下程序运行后的输出结果是
Private Sub Commandl_Click( )
Dim X As Integer，y As Integer，z As Integer
x=1：y=2： Z=3
Call God(x，x，z)
Print x；x；z
Call God(x，y，y)
Print X；y；y
End Sub
Private Sub God(x As Integer，y As Integer，z As Integer)
x=3 * Z + 1
y=2 * Z
z=x + y
End Sub
A. 6 6 12
B. 8 5 10
C. 9 6 12
D. 8 10 10
[单项选择]单击按钮时，以下程序运行后的输出结果是 Private Sub proc1(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 proc1(x，x，z) Print x；x；z Call proc1(x，y，y) Print x；y；y End Sub
A. 6 6 12 `
B. 9 5 10 6101051010
C. 9 6 12
D. 9 10 10 910155410
[单项选择]单击按钮时，以下程序运行后的输出结果是
Private Sub Command1_Click（ ）
Dim x As Integer，y As Integer，z As Integer
x=1:y=2:z=3
Call God(x，x，z)
Print x；x；z
Call God(x，y，y)
Print x；y；y
End Sub
Private Sub God(x As Integer，y As Integer，z As Integer)
X=3*z+1
Y=2*Z
z=x+y
End Sub
A. 6 6 12
B. 8 5 10
C. 9 6 12
D. 8 10 10
[单项选择]单击按钮时，以下程序运行后的输出结果是（ ）。
Private Sub Commandl_Click( )
Dim X As Integer，y As Integer，z As Integer
x=1：y=2： Z=3
Call God(x，x，z)
Print x；x；z
Call God(x，y，y)
Print X；y；y
End Sub
Private Sub God(x As Integer，y As Integer，z As Integer)
x=3 * Z + 1
y=2 * Z
z=x + y
End Sub
[单项选择]单击按钮时，以下列程序运行后的输出结果是
Private Sub proc1(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 proc1(x，x，2)
Print x；x；z
Call proc1(x，y，y)
Print x；y；y
End Sub
A. 6 6 12
B. 9 5 10
C. 9 6 12
D. 9 5 10
[单项选择]单击按钮时，以下程序运行后的输出结果是（ ）。
Private Sub proc1(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 proc1(x，x，z)
Print x；x；z
Call proc1(x，y，y)
Print x；y；y
End Sub
A. Dim NewArray(10)As Integer
B. Dim NewArray(1 T0 10)As Integer
C. Dim NewArray(10)Integer
D. Dim NewArray(1 To 10)Integer
[单项选择]单击按钮时，以下程序运行后的输出结果是( )。
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
[单项选择]单击命令按钮时，下列程序的执行结果是 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 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 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（ ）
Dima 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 Integer，z As Integer)
SecProc=FirProc(z，x，y) +x+7
End Function
Ａ) 20 Ｂ) 25 Ｃ) 37 Ｄ) 32
