首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮(名称为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
20
问题
在窗体上画一个命令按钮(名称为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的属性值,相应会触发到
有如下程序:PrivateSubForm_Click()DimiAsInteger,SumAsInteger Sum=0 Fori=2To10 IfiMod2<>0AndiM
下列程序段的执行结果为m=2n=3Do m=m+n n=n+1LoopWhilem<10Printm;n
在窗体上用复制、粘贴的方法建立了一个命令按钮数组,数组名为M1。设窗体Form1标题为“myform1”,双击控件数组中的第3个按钮,打开代码编辑器,写下如下代码:PrivaeSubM1_Click(IndexAsInteger)
在窗体上添加一个按钮,名为Command1,然后编写如下的事件过程,输出结果为PrinvateSubComandl_Click() Fori=1To4 x=4 Forj=1To3
在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然后编写如下事件过程:PrivateSubForm_Load() List1.AddItem"Item1" List1.AddItem"It
编写如下两个事件过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger) PrintChr(KeyCode)EndSubPrivateSubFo
窗体、图片框或图像框中的图形通过对象的______属性设置。
随机试题
一般情况下,运输工具检疫后签发的证书有()
地榆的功效是侧柏叶的功效是
A.乌头汤B.防风汤C.独活寄生汤D.薏苡仁汤E.尪瘅汤
企业弥补亏损的渠道主要有()。
甲公司下列情况中,注册会计师应实施控制测试的是()。
始建于7世纪的布达拉宫是举世闻名的()。
下面是两位中学教师关于“酯化反应”的教学过程实录。李老师的教学实录【播放漫画】看漫画,喝醋能解酒。【讲述】台州人以豪爽著称,经常以酒会友,为什么喝醋能够解酒?【回答】酸跟醇作用生成酯。【讲述】同学们回答的很
面对偷猎者的铤而走险,监管工作依然任重道远。以鸟类为例,尽管迁徙地域、季节相对固定,但由于路线长、地形复杂,很难巡护迁徙全程;地区边界等跨地域执法,使公安、边防、林业等部门的权限受到限制,对不足的人手提出挑战;加之违法分子的手段不断更新,隐蔽性越来越强。这
打开工作簿文件Exc.xlsx,对工作表““计算机动画技术”成绩单"内数据清单的内容进行排序,条件是:主要关键字为“系别”,“升序”,次要关键字为“考试成绩”,“降序”,工作表名不变,保存Exc.xlsx工作簿。
To;Roberts.hifi.co.ukFrom;Dave@electricalsupplies.comWearesorrythatourcomputerorderingsystembroke【16】______la
最新回复
(
0
)