首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮(名称为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
60
问题
在窗体上画一个命令按钮(名称为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://www.kaotiyun.com/show/IETp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值:PrivateSubCommand1Click()Dima(10)AsInteger,maxAsIntegerFork=1To10
下面叙述中错误的是()。
(1)在名称为Form1的窗体上画1个名称为Framel、标题为“学位”的框架;框架内有1个名称为Option1的控件数组,该控件数组含有4个标题分别为“学士”、“硕士”、“博士”和“其他”的单选按钮,它们的Index属性分别为0、1、2、3,且标题为“硕
求1!+2!+…+10!的程序如下:PrivateFunctionS(xAsInteger)f=1Fori=1Toxf=f*iNexts=fEndFunction
设有如下一段程序:PrivateSubCommand1_Click()StaticaAsVarianta:Array("one","two","three","four","five")Printa(3)
在窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型和变量声明:PrivateTypePersonnameAsString*8maj
(1)在名称为Form1的窗体上添加一个名称为Shape1的形状控件,要求在属性窗口中将其形状设置为椭圆,其短轴(垂直方向)、长轴(水平方向)的长度分别为800、1600。把窗体的标题改为“Shape控件”,窗体上无最大化、最小化按钮。程序运行后的窗体如图
下面关于标准模块的叙述中,错误的是()。
窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。设有如下的类型声明:TypePersonnameAsString*8majorAsString*20EndType
随机试题
在工程网络计划执行过程中,若某项工作比原计划拖后,而未超过该工作的自由时差,则()。
凝血酶敏感的凝血因子是
初产妇,33岁,41周妊娠,产前检查均正常。自觉胎动减少1天收入院。查体:血压110/75mmHg,宫高35cm,腹围100cm,胎位LOA,胎头先露,胎心率为120次/min。以下哪项并不提示胎儿窘迫
支付结算实行( )相结合的管理体制。
一种资产的内在价值等于预期的现金流。()
商品证券是证明持有人有商品使用权或所有权的凭证,取得了这种证券就等于取得了这种商品的所有权,持有人对这种证券所代表的商品所有权受法律保护。()
金融犯罪侵犯的客体是金融管理秩序,犯罪主体是单位。()
贷前调查的内容有()。
被誉为“东方艺术之花”的是()。
制定幼儿园教育目标的依据有()。
最新回复
(
0
)