首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的代码如下: Private Sub Command1_Click() Dim x As Integer,y As Integer x=Val(InputBox("输入整数")) y=Val
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的代码如下: Private Sub Command1_Click() Dim x As Integer,y As Integer x=Val(InputBox("输入整数")) y=Val
admin
2016-09-19
57
问题
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的代码如下:
Private Sub Command1_Click()
Dim x As Integer,y As Integer
x=Val(InputBox("输入整数"))
y=Val(InputBox("输入整数"))Print Str(fun(x,y)+x+y)
End Sub
Private Function fun(ByRef m As Integer,ByVal n As Integer)
m=m*m:n=n+n:fun=m+n
End Function
运行程序,单击命令按钮时,出现输入对话框,分别输入3、5,则窗体上显示的是
选项
A、27
B、28
C、33
D、38
答案
C
解析
在Visual Basic中调用过程时,参数有两种传递形式:按值传递(Byval)和按址传递(Byref),默认为按址传递。其中,当参数按址传递时,如果在引用该参数的过程中改变了形参的值,同时也就改变了传递参数时实参变量的值。本题中fun的参数m是按地址传递的,n是按值传递的,因此在f中对m的改变会影响实参x,对n的操作不会影响实参y,即输出的是Str(19+9+5)="33"。
转载请注明原文地址:https://kaotiyun.com/show/IOLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
软件设计包括软件的结构、数据接口和过程设计,其中软件的过程设计是指
下列程序运行后的输出结果是FunctionFun(n)x=n*nFun=x一11EndFunctionPrivateSubCommand1_Click()Fork=1To2Y=Fun(k
单击命令按钮时,下列程序的运行结果为PrivateSubCommand1_Click() PrintFun(23,18)EndSubPublicFunctionFun(mAsInteger,nAsInte
在窗体上用复制、粘贴的方法建立了一个命令按钮数组,数组名为M1。设窗体Form1标题为“myform1”,双击控件数组中的第3个按钮,打开代码编辑器,写下如下代码:PrivaeSubM1_Click(IndexAsInteger)
在窗体上添加一个按钮,名为Command1,然后编写如下的事件过程,输出结果为PrinvateSubComandl_Click() Fori=1To4 x=4 Forj=1To3
下列程序运行时,若输入123,输入对话框的提示信息是______。PrivateSubCommand1_Click()X1=InputBox("请输入") MsgBox(X1)EndSub
当用户()时,会引发焦点所在控件的KeyPress事件。
下列叙述中正确的是()。
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Crick()DimIAsInteger,nAsIntegerForj=0T
随机试题
雪天行车时,为预防摩托车侧滑或与其他车辆发生刮碰,应______。
定期换油法是根据介质本身规定的使用寿命来进行的。
护士误给某青霉素过敏患者注射青霉素,造成患者死亡,此事故属于()。
根据《企业所得税法》的规定,在计算企业所得税应纳税所得额时,不计入收入总额的是()。
为保证筹建工作正常进行所需办公设备、生活家具的购置费计入()中。
利用声发射探测法可进行()检测。
2001年后,中国银行从以传统的存贷业务、被动服务为主向()的管理模式转变。
在现代的CPU芯片中又集成了高速缓冲存储器(Cache),其作用是
接收并阅读由xuexq@mail.neea.edu.cn发来的E-mail,并按E-mail中的指令完成操作。
ThreecenturiesagotheFrenchmathematicianReneDescartespredictedthatitwouldneverbepossibletomakeamachinethatthi
最新回复
(
0
)