首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command l_Click()Dim x As Integer x=1 0 Print funl(x,12)+x End Sub Private Function f
编写如下程序: Private Sub Command l_Click()Dim x As Integer x=1 0 Print funl(x,12)+x End Sub Private Function f
admin
2020-04-18
35
问题
编写如下程序:
Private Sub Command l_Click()Dim x As Integer x=1 0
Print funl(x,12)+x
End Sub
Private Function fun l(m As Integer,n As Integer)As Integer
Ifn>10 Then m=n
fual=m+n
End Function
程序运行后,单击命令按钮Commandl,输出结果为
选项
A、30
B、32
C、34
D、36
答案
D
解析
本体是一个简单的函数调用,调用funl函数时将x的值作为实参传送给funl函数,由于第二个参数12满足n>10,会将形参m的值也改变为12,因返回的函数值为24;由于函数funl的各个参数为地址传递,因此对于形参m的值会影响实参x的值,即x的值也变为12。
转载请注明原文地址:https://kaotiyun.com/show/60Tp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
标准模块中有如下程序代码:PublicxAsInteger,YAsIntegerSubTempSub()x=10:y=20EndSub在窗体上有1个命令按钮,并有如下事件过程:PrivateSubCommandl_C
在窗体上画一个名为Command1的命令按钮,然后编写以下程序:PrivateSubCommandl_Ctick()DimM(to)AsIntegerFork=1To10M(k)=12一kNe
下列程序执行后,其输出结果为().Dima(5)Fori=0To4a(i)=i+1:m=i+1Ifm=3Thena(m-1)=a(i-2)Elsea(m)=a(i)Ifi=2Thena(i一1)=a(m-3)
要求在程序运行时,如果按住鼠标左键不放而移动鼠标,鼠标的位置坐标同步显示在窗体右上角的标签(名称为Label1)中,如右图所示,放开鼠标左键后,停止同步显示。下面可以实现此功能的程序是( )。
标准模块中有如下程序代码:PublicxAsInteger,YAsIntegerSubTempSub()x=10:y=20EndSub在窗体上有1个命令按钮,并有如下事件过程:Pri
窗体上有一个名称为Textl的文本框,一个名称为CDl的通用对话框,一个标题为“打开文件”的命令按钮,如图所示。命令按钮的单击事件过程如下:PrivateSubCommandl_Click()CDI.ShowOpenOp
(1)在考生文件夹下有一个工程文件sjt3.vbp,其功能是:1)单击“读数据”按钮,则把考生文件夹下in3.dat文件中的100个按升序排列的整数读入到数组a中,同时显示在Text1文本框中;2)单击“查找”按钮,则提示用户输入查找的数,并利用
窗体如图1所示。要求程序运行时,在文本框Text1中输入一个姓氏,单击"删除"按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能:PrivateSubCommand1_Click() Dimn%
窗体上有一个由两个文本框组成的控件数组,名称为Text1,并有如下事件过程:PrivateSubText1_Change(IndexAsInteger) SelectCaseIndex Case0 Text1(1).
随机试题
下列选项中,哪些属于社会工作文化层面的目标?()
有关骨关节结核的病理分期,下列正确的是( )。
A.Broca失语B.Wernicke失语C.传导性失语D.经皮质性失语E.完全性失语
提示体内储存铁变化最敏感的指标是
设置固定的栅栏是()安全装置。
同一票货物如包装不同,其计费标准和等级也不同,如托运人未按不同包装分别列明毛重和体积,则全票货物均按收费较高者计收运费。()
企业服务管理的对象在宏观层面上包括()两个方面。①股利分配管理;②企业财务活动;②各种财务关系;④投资管理
从业人员保守企业秘密。正确的做法是()。
形成性英语口语评价的方式有哪些?
ConsumerDemandandDevelopmentofGreenCarsThedayautomakersputtheearthatthetopoftheiragendawillgodowninhi
最新回复
(
0
)