首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮(名称为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
58
问题
在窗体上画一个命令按钮(名称为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://www.kaotiyun.com/show/QOLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
软件设计包括软件的结构、数据接口和过程设计,其中软件的过程设计是指
有如下程序:PrivateSubForm_Click()DimiAsInteger,SumAsInteger Sum=0 Fori=2To10 IfiMod2<>0AndiM
以下用户自定义函数FunctionFunc(aAsInteger,bAsInteger)AsIntegerStaticmAsInteger.iAsInteger m=0:i=2 i=i+m+i
在窗体上用复制、粘贴的方法建立了一个命令按钮数组,数组名为M1。设窗体Form1标题为“myform1”,双击控件数组中的第3个按钮,打开代码编辑器,写下如下代码:PrivaeSubM1_Click(IndexAsInteger)
事件的方法是用于______。
Function过程有别于Sub过程的最主要的特点是()。
以下能从字符串"VisualBasic"中直接取出子字符串"Basic"的函数是()。
下列叙述中正确的是()。
随机试题
大黄牡丹汤的组成中含有药物是()大黄附子汤的组成中含有的药物是()
甲受国有事业单位委派,担任某农村信用合作社主任。某日,乙找甲,说要贷款200万做生意,但无任何可抵押财产也无担保人,不符合信贷条件。乙表示若能贷出款来,就会给甲10万元作为辛苦费。于是甲嘱咐该合作社主管信贷的职员丙“一定办好此事”。丙无奈,明知不符合条件仍
美国房地产经纪人考试内容主要包括()。
根据《建设工程安全生产管理条例》的规定,建设工程意外伤害保险的期限()。
外商投资企业可以直接将一定限额内的外汇资金结汇使用,无需提交支付用途凭证等凭证。该一定限额是指()。
2020年6月30日颁布的《中华人共和国香港特别行政区维护国家安全法》是保持香港特别行政区繁荣和稳定的重要法律。以下属于该法规定处罚的罪行有:①分裂国家罪②颠覆国家政权罪③恐怖活动罪④勾结外国或者境外势力危害国家安全罪
关于被害人承诺,下列选项中正确的是()
一条生产线生产的产品正品率为p(0<p<1),连续检查5件,X表示在查到次品之前已经取到的正品数,求X的数学期望.(在两次检查之间各件产品的质量互不影响)
America’sWesternMigration1.AfterAmericadeclaredindependencein1776,itscitizensbeganmigratingfromtheoriginalco
Throughoutthenation’smorethan15,000schooldistricts,widelydifferingapproachestoteachingscienceandmathhaveemerge
最新回复
(
0
)