题目详情
当前位置:首页 > 职业培训考试
题目详情:
发布时间:2023-11-03 18:15:49

[单项选择]单击按钮时,以下程序运行后的输出结果是( )。
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 S"的相关试题:

[单项选择]单击按钮时,以下程序运行后的输出结果是( )。
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 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 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   7 11 11
B. 8 5 10  5 11 11
C. 9 6 12  9 10 15
D. 8 10 10  5 9 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,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 Commandl_Click( )     Dim x As Integer,y As Integer,z As Integer     X=4:y=2: Z=3     Call Gopd(x,x,z)     Print x;X;Z     Call Gopd(x,y,y)     Print x;y;y   End Sub   Private Sub Gopd(x As Integer,y As Integer,z As Integer)     X=3 * Z + 1     y=2 * z     z=x + y   End Sub
[单项选择]已知有下面过程:
Private Sub procl(a As Integer,b As String,Optional x As Boolean)
End Sub
正确调用此过程的语句是______。
A. Call procl(3)
B. Call procl 3,"xyz" ,True
C. procl(5,"xyz" ,False)
D. procl 12,"xyz/
[单项选择]单击命令按钮时,下列程序的执行结果是  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( )     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. 13
B. 16
C. 36
D. 33
[单项选择]单击命令按钮时,下列程序的执行结果是
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( )
Call 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

我来回答:

购买搜题卡查看答案
[会员特权] 开通VIP, 查看 全部题目答案
[会员特权] 享免全部广告特权
推荐91天
¥36.8
¥80元
31天
¥20.8
¥40元
365天
¥88.8
¥188元
请选择支付方式
  • 微信支付
  • 支付宝支付
点击支付即表示同意并接受了《购买须知》
立即支付 系统将自动为您注册账号
请使用微信扫码支付

订单号:

请不要关闭本页面,支付完成后请点击【支付完成】按钮
恭喜您,购买搜题卡成功
重要提示:请拍照或截图保存账号密码!
我要搜题网官网:https://www.woyaosouti.com
我已记住账号密码