首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Commandl的命令按钮,其单击事件过程及相关的代码如下 Private Sub Command 1 Clic Dim xkOim As Integer,y As Integer x=Val(InputBox(“输入整数”)) Y=V
窗体上有一个名称为Commandl的命令按钮,其单击事件过程及相关的代码如下 Private Sub Command 1 Clic Dim xkOim As Integer,y As Integer x=Val(InputBox(“输入整数”)) Y=V
admin
2019-07-30
52
问题
窗体上有一个名称为Commandl的命令按钮,其单击事件过程及相关的代码如下
Private Sub Command 1 Clic
Dim xkOim 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
选项
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/qiUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下程序的功能是随机产生10个两位的整数:OptionBase1PrivateSubCommand1_Click()Dima(10)AsInteger,iAsIntegerRandomizeF
窗体上有名称分别为Text1、Text2的文本框,名称为Command1的命令按钮。运行程序,在Text1中输入“FormList”,然后单击命令按钮,执行如下程序:PrivateSubCommand1_Click()Text2.T
决定标签内容显示位置的属性是
假定有以下程序:PrivateSubForm_Click()a=1:b=aDoUntila>=5x=a*bPrintb;xa=a+b:b=b+aLoopEnd
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimIAsInteger,nAsIntegerFori
在窗体上画一个命令按钮和两个标签,其名称分别为Command1、Label1和Label2,然后编写如下事件过程:PrivateSubCommand1_Click()a=0Fori=lTo10a=a+l:b
目录列表框Path属性所表示的含义是
以下关于变量作用域的叙述中错误的是
在考生目录下有一个工程文件vbsii5.vbp,用来计算勾股定理整数组合的个数。勾股定理中3个数的关系是:a2+b2=c2。例如,3、4、5就是一个满足条件的整数组合(注意:a,b,c分别为4,3,5与分别为3,4,5被视为同一个组合,不应该重复计算)。编
随机试题
下列关于消费税纳税地点的说法中,正确的有()。
以下IP地址中属于A类地址的是()
水杨酸具有镇痛作用时的血药浓度为()。
现代市场经济中,物质要素和人力资本要素的流动是以()的投入和流动为前提。
根据《担保法》的规定,以企业债券进行质押的,质押合同生效的时间是()。
感受性是()。
快车和慢车同时从甲、乙两地相向开出,快车40km/h,经过3h,快车已驶过中点25km,这时快车与慢车相距7km,慢车每小时行多少km?()
McDonald’s,Greggs,KFCandSubwayaretodaynamedasthemostlitteredbrandsinEnglandasKeepBritainTidy【C1】________fast-f
Knowingisdiscipline-specific;itdefinesallthosethingswecometolearnwhenwepursuethecraftofourparticulartraining
【B1】【B20】
最新回复
(
0
)