首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
单击命令按钮时,下列程序的执行结果是 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 S
单击命令按钮时,下列程序的执行结果是 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 S
admin
2010-11-20
22
问题
单击命令按钮时,下列程序的执行结果是
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
答案
C
解析
此题程序代码中用了双层调用,我们对这样的问题要多加小心,千万不要把实参和相对应的形参弄混。主调过程Command1_Click输出的是SecProc(c,b,A)的返回值,调用过程SecProc时,主调过程分别把实参c、b、a地址传给形参x、y、z,此时在过程SecProc中,SecProc=FirProc(a,c,B)+c。由此看出,程序段执行此语句时,将调用过程FirProc。把实参a、c、b的地址分别传给形参x、y、z,此时在过程FirProc中,FirProc=2*x+y+3*z,所以FirProc(a,c,B)=6+4+ 15=25,SecProc(a,c,B)=25+3=28,所以选项C)是正确的。
转载请注明原文地址:https://kaotiyun.com/show/Odmp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列关于Java源程序结构的论述中,正确的是______。A)一个文件包含的import语句最多1个B)一个文件包含的public类最多1个C)一个文件包含的接口定义最多1个D)一个文件包含的类定义最多1个
数组arr经过下面的操作后结果为()。int[]arr={1,2,3};for(inti=0;i<2;i++)arr[i]=0;
下面代码的运行结果是( )。publicclassConcatTest{publicstaticvoidmain(String[]args){Stringstr1="abc";
在关系模型中,把数据看成一个二维表,每一个二维表称为一个【】。
下面不属于软件工程的3个要素的是()。
______是一个特殊的方法,是为对象初始化操作编写的方法,用它来定义对象的初始状态。
当处理的数据量很多,或向文件写很多次少量的数据,一般使用( )流。
在面向对象方法中,类之间共享属性和操作的机制称为【】。
将文本框的PasswordChar属性设置为一个星号*,运行时,在文本框中输入的字符仍然显示出来,而不显示星号,原因可能是()。
随机试题
在政策过程中,处于核心地位的创新环节是公共政策的()
要求多级放大器输入电阻低,输出电阻也低,应该在多级放大器的级间引入________负反馈。
男性,33岁,车祸中方向盘撞击右上腹2h,腹痛。体检:神志淡漠,面色苍白。血压90/60mmHg,全腹肌紧张压痛、反跳痛,右上腹明显,移动性浊音阳性。最可能的诊断是
关于舌的发育,错误的是
A.呋塞米B.卡托普利C.多巴胺D.美托洛尔E.地高辛长期应用可改善心衰患者症状,改善预后的药物是()。
预计ABC公司明年的税后利润为1000万元,发行在外的普通股500万股。要求:预计其盈余的60%将用于发放现金股利,股票获利率应为4%,计算其股票的价值;
督察警察是对公安机关的人民警察执行法律、法规,遵守纪律的情况进行监督的警察。督察警察的主要职责包括()。
下列矩阵中不是二次型的矩阵的是()
下列4个数中最小的是______。A.12.1B.1100.1BC.C.1HD.14.1Q
Readthearticlebelowandchoosethebestsentencefromthelistonthenextpagetofilleachofthegaps.Foreachgap(1-
最新回复
(
0
)