首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮(名称为Commandl),并编写如下代码: Function Fun 1(ByVal a As Integer, b As Integer)As Integer Dim t As Integer t=a-b:b=t+
在窗体上画一个命令按钮(名称为Commandl),并编写如下代码: Function Fun 1(ByVal a As Integer, b As Integer)As Integer Dim t As Integer t=a-b:b=t+
admin
2020-01-02
78
问题
在窗体上画一个命令按钮(名称为Commandl),并编写如下代码:
Function Fun 1(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 Commandl_Click()
Dim x As Integer
x=10
Print Funl(Funl(x,(Funl(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;最后调用Funl(6,x一1),其结果为0,x的值也不变为10。本题中的传址调用是没有作用的,因为表达式是不能传地址的。
转载请注明原文地址:https://kaotiyun.com/show/IETp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在考生文件夹下有一个工程文件sjt3.vbp,请在窗体上添加两个单选按钮(名称分别为Option1和Option2,标题分别为“添加项目”和“删除项目”),一个列表框(名称为List1)和一个文本框(名称为Text1),如图1所示。编写窗体的Clic
窗体上有Command1、Command2两个命令按钮。现编写以下程序:OptionBase0Dima()AsInteger,mAsIntegerPrivateSubCommand1_Click()m
设有如下程序:OptionBase1Dima(3,4)AsInteger,b(4,3)AsIntegerPrivateSubCommand1_Click()循环1Fori=1To3
窗体上有1个名称为List1的列表框,1个名称为Text1的文本框。编写如下程序代码:PrivateSubForm_Load()List1.Addhem"花卉"List1.Addhem"绿植"List1.Addh
为了使窗体的大小可以改变,必须把它的BorderStyle属性设置为()。
以下叙述中错误的是()。
在窗体上有一个文本框Text1和一个标签Label1,要求运行程序时,在文本框中输入的内容立即显示在标签中(如图所示),则空白处应填入的内容是()。PrivateSubText1_________()Label1.Capt
要想不使用Shift或Ctrl键就能在列表框中同时选择多个项目,则应把该列表框的MultiSelect属性设置为()。
下面有关标准模块的叙述中,错误的是()。
随机试题
急性化脓性胆囊炎时,最易穿孔的胆囊部位是
假定某投资中心的经营资产为400000元,经营净收益为120000元。要求:(1)计算该投资中心的投资利润率。(2)如果利息按140A,计算,其剩余利润为多少?(3)如果采用投资利润率来衡量其工作业绩,预计对管理
施工企业各管理层、职能部门、岗位的安全生产责任应形成责任书,并应经责任部门或责任人确认。责任书的内容不包括()。
上题图中所示的外伸梁C处截面的弯矩和剪力分别为多大?
建设项目管理的工作内容主要包括( )。
圣诞树用成套灯具
证券公司对客户融资融券的额度按现行规定不得超过客户提交保证金的2倍,期限不超过9个月。()
相对于派发现金股利,企业发放股票股利的优点有()。
下列情形中,不违背货币资金“不相容岗位相互分离"控制原则的是()。
By using(26), a 600M -byte music CD can be compressed to 50M bytes or less. It can be streamed(downloaded in chunks) so that you
最新回复
(
0
)