首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(36)窗体上有一个名称为Commandl的命令按钮,其单击事件过程及相关的代码如下: Private Sub Command l_Click() Dim x As Integer,y As Integer
(36)窗体上有一个名称为Commandl的命令按钮,其单击事件过程及相关的代码如下: Private Sub Command l_Click() Dim x As Integer,y As Integer
admin
2019-07-30
28
问题
(36)窗体上有一个名称为Commandl的命令按钮,其单击事件过程及相关的代码如下:
Private Sub Command l_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/zZUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面程序运行时,若输入“VisualBasicProgramming”,则在窗体上输出的是()。PrivateSubCommand1_Click()DimNDin(25)AsInteger,Chr1AsStri
在窗体上画一个名称为Commandl的命令按钮,再画两个名称分别为Label1、Label2的标签,然后编写如下程序代码:PrivateXAsIntegerPrivateSubCommandl_Click()Private
编写如下程序:PrivateSubCommand1_Click()Subsubf(s1AsStrings2AsString)Dimstr1AsString,str2AsString
一般情况下,当对关系R和S进行自然连接时,要求R和S含有一个或者多个共有的
在E—R图中,用来表示实体联系的图形是
数据库设计中反映用户对数据要求的模式是
假定有如下语句:answer$=MsgBox("String1","String2","String3",2)执行该语句后,将显示一个信息框,单击其中的“确定”按钮,则answer$的值为
设有以下函数过程PrivateFunctionFun(a()AsInteger,bAsString)AsInteger…若已有变量声明:Dimx(5)AsInteger,nAsInteger,chAsString
以下合法的VB变量名是
设有如下变量声明语句:Dima,bAsBolean则下面叙述中正确的是
随机试题
“为储户保密”原则的含义是()
以下哪个症状不属温病的中焦病证
A.血府逐瘀汤B.柴胡疏肝散C.少腹逐瘀汤D.旋覆花汤E.失笑散合丹参饮腹痛瘀血内停的主方是
在合作企业中,合作各方的权利和义务是根据()决定的。
Incaseyoucanmakeareduction_5%_yourprice,wemaystrikethedealwithyou.
万先生于2013年5月13日收到电文“你10日电我方接受,但支付条件由D/P改为L/C即期”,该电文是()。
征信服务中心收到商业银行重新报送的更正信息后,应当在()个工作日内对异议信息进行更正。
有些贵州人不会说普通话,贵州人都喜欢吃辣椒。如果上述陈述为真,以下哪项陈述也是真的?
Noneofusexpectedthepresidentto_attheparty.Wethoughthewasstillinhospital.
A、Three.B、Twenty-four.C、Twohundred.D、Eight.A该题同样考查对数字的捕捉情况。而和religion同时出现的是数字three,因此选择选项A。
最新回复
(
0
)