首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮(名称为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
在窗体上画一个命令按钮(名称为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
admin
2016-09-19
24
问题
在窗体上画一个命令按钮(名称为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(x,x-1),其结果为12,x的值不变仍为10;然后调用Fun1(x,12),其结果为6,x的值也不变为10;最后调用Fun1(6,x-1),其结果为0,x的值也不变为10。本题中的传址调用是没有作用的,因为表达式是不能传地址的。
转载请注明原文地址:https://jikaoti.com/ti/6YJ0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在运行程序时,在文本框中输入新的内容,或在程序代码中改变Text的属性值,相应会触发到
下列程序段的执行结果为m=2n=3Do m=m+n n=n+1LoopWhilem<10Printm;n
在窗体上用复制、粘贴的方法建立了一个命令按钮数组,数组名为M1。设窗体Form1标题为“myform1”,双击控件数组中的第3个按钮,打开代码编辑器,写下如下代码:PrivaeSubM1_Click(IndexAsInteger)
编写如下两个事件过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger) PrintChr(KeyCode)EndSubPrivateSubFo
在窗体上画一个命令按钮Command1和两个文本框,名称分别为Text1和Text2。编写如下两个事件过程:DimStr1AsString,str2AsStringPrivateSubform_load() Text1
事件的方法是用于______。
在窗体上画一个名称为“Command1”的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click() DimaAsString a="123456789" Fori=1To5
下列程序运行时,若输入123,输入对话框的提示信息是______。PrivateSubCommand1_Click()X1=InputBox("请输入") MsgBox(X1)EndSub
Function过程有别于Sub过程的最主要的特点是()。
随机试题
《尝试集》是我国文学史上第一部白话诗集。()
代谢性酸中毒常见的原因是
下肢静脉曲张病人术后早期活动主要是为了预防
最可能的诊断是若腹水检查为渗出液,下列哪项检查对诊断最简便而有价值
影响CT图像质量的因素不包括
男性,60岁,2天前上腹持续性胀痛,12小时后右下腹痛,阵发加剧,腹胀。近4年来常有饭前上腹灼痛,常在冬春季发作。查体:38℃,脉搏120次/分,血压150/90mmHg。腹稍胀,满腹有压痛,但右下腹更明显,有肌紧张及反跳痛,肝浊音界存在,肠鸣音未听到。白
商业银行开办个人理财业务的时候,需要向银监会申请。在申请时需要报送的材料不包括()。
人的身心发展有不同的阶段,“心理断乳期”在()。
甲以个人名义向乙独资设立的腾飞有限公司借款8万元,借期2年,不久,甲与丙登记结婚,将借款8万元用于购买新房和家电,婚后1年,甲与丙协议离婚,未对债务的偿还作出约定。下列哪一项是正确的?
Lookattheextractfromabrochureonthefollowingpage.Fromthelistofheadingsbelow,choosethemostsuitableheadingsfo
最新回复
(
0
)