首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮(名称为Command1),并编写如下代码: Function Fun1(ByVal a As Integer, b As Integer)As Integer Dim t As Integer t=a-b b=t+a
在窗体上画一个命令按钮(名称为Command1),并编写如下代码: Function Fun1(ByVal a As Integer, b As Integer)As Integer Dim t As Integer t=a-b b=t+a
admin
2020-06-30
18
问题
在窗体上画一个命令按钮(名称为Command1),并编写如下代码:
Function Fun1(ByVal a As Integer, b As Integer)As Integer
Dim t As Integer
t=a-b
b=t+a
Fun1=t+b
End Function
Private Sub Command1_Click()
Dim x As Integer
x=10
Print Fun1(Fun1(x,(Fun1(x, x-1))), x-1)
End Sub
程序运行后,单击命令按钮,输出结果是( )。
选项
A、10
B、0
C、11
D、21
答案
B
解析
本题是过程的嵌套调用,过程嵌套调用时要先计算最内层的过程,然后由里向外执行。因此Fun1(Fun1(x,(Fun1(x, x-1))), x-1)执行过程如下:
先执行Fun1(x, x-1),由于形参a是按值传递,因此不会影响x的值,x=10,即Fun1(10,9)。t=1,b=1+10=11,则函数返回值为1+11=12。
再执行Fun1(x,(Fun1(x, x-1))),由于内层过程返回12,因此又可写成Fun1(x,(12)),由于x仍为原值,因此过程即Fun1(10,12)。t=-2,b=-2+10=8,则函数返回值为-2+8=6。
最后执行Fun1(Fun1(x,(Fun1(x, x-1))), x-1),即Fun1(6, x-1),由于x仍为原值,因此过程即为Fun1(6,9)。t=-3,b=-3+6=3,则函数返回值为-3+3=0。
转载请注明原文地址:https://kaotiyun.com/show/cBHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列VisualBasic变量名中,正确的是()。
以下变量名中合法的是( )。
设窗体上有名称为Option1的单选按钮,且程序中有语句:IfOption1.Value=TrueThen下面语句中与该语句不等价的是( )。
设a=4,b=5,c=6,执行语句Printa
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程:PrivateSubCommand1_Click() s=0 Fori=1To15 x=2*i-1 IfxMod
以下叙述中错误的是( )。
以下说法中正确的是
下列关于类、对象、属性和方法的叙述中,错误的是()。
有三个关系R、S和T如下:其中关系T由关系R和S通过某种操作得到,该操作为()。
某系统结构图如下图所示该系统结构图的深度是
随机试题
A.与相应的椎骨平面相差2节B.与相应的椎骨平面相差1节C.与相应的椎骨平面相差3节D.胸椎10~12之间E.胸椎12到腰1之间上段胸髓位于
早孕出现最早及最重要的症状是
易散失气味的饮片是
支票上的收款人名称不得更改,更改的支票无效。()
某市卷烟厂为增值税一般纳税人,2017年12月份发生下列经济业务:(1)向农业生产者收购烟叶30吨,支付收购价款40万元,另外按收购价款的10%支付了价外补贴,烟叶税20%,取得收购凭证。另支付不含税运输费用3万元,取得运输公司开具的增值税专用发票;烟叶
下列热化学方程式或离子方程式中,正确的是()。
有三只烧杯,分别盛有氯化铜、氯化钾和硝酸银三种溶液;均以Pt作电极,将它们串联在一起电解一定时间,测得电极增重总和2.8g,这时产生的有色气体与无色气体的物质的量之比为()。
对于滚动条控件,下列说法正确的是
Thenumbercodes3152,3455and5213standforthreeofthewordsMASH,MISSandSHAM.Workoutthecodeforeachofthefourwo
A、HisEnglishisstillpooraftertenyearsinAmerica.B、Hedoesn’tmindspeakingEnglishwithanaccent.C、Hedoesn’tlikethe
最新回复
(
0
)