首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮(名称为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
29
问题
在窗体上画一个命令按钮(名称为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://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
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后输写如下程序:PrivateSubCommand1_Click()Dimx,y,zAsInteger x=5 y=7
在窗体上添加一个按钮,名为Command1,然后编写如下的事件过程,输出结果为PrinvateSubComandl_Click() Fori=1To4 x=4 Forj=1To3
在窗体上画一个命令按钮Command1和两个文本框,名称分别为Text1和Text2。编写如下两个事件过程:DimStr1AsString,str2AsStringPrivateSubform_load() Text1
在窗体上画一个名称为“Command1”的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click() DimaAsString a="123456789" Fori=1To5
下列程序运行时,若输入123,输入对话框的提示信息是______。PrivateSubCommand1_Click()X1=InputBox("请输入") MsgBox(X1)EndSub
要显示当前过程中的所有变量及对象的取值,可以利用()窗口。
以下能从字符串"VisualBasic"中直接取出子字符串"Basic"的函数是()。
随机试题
正常成年人1天产生内生水约
能产生白喉毒素的白喉杆菌,是因为其有
执业药师继续教育是
关于行政诉讼质证规则,下列说法不正确的有:
如图所示梁受集中力P作用.其弯矩图形状正确的是()。
某商品房项目于2007年5月8日领取施工许可证,则该工程应在( )前开工。
下列哪些属于不授予外观设计专利权的情形?
ABCD是直角梯形,AB=15cm,AD=10cm,阴影面积是15cm2,则梯形ABCD的面积是()cm2
Achildlaughs40timesadayfornoreason,astheaverageadult(1)______laughs20timestheday.Theschool,thejobandthe
CompanieswithabigstaffinTokyo___________________(在运行成本居高不下和业务不断萎缩的夹缝中).
最新回复
(
0
)