首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Commandl_Click() Private Function funl(ByVal m As Integer, Dim x As Integer,y As Integer
编写如下程序: Private Sub Commandl_Click() Private Function funl(ByVal m As Integer, Dim x As Integer,y As Integer
admin
2017-11-23
49
问题
编写如下程序:
Private Sub Commandl_Click() Private Function funl(ByVal m As Integer,
Dim x As Integer,y As Integer n As Integer)As Integer
x=10:y=20 m=m*m:n=n+n
Call funl(x,y) End Function
Print x;y
End Sub
程序运行后,单击命令按钮Commandl,输出结果为
选项
A、10 25
B、10 40
C、100 25
D、1 00 40
答案
B
解析
在Visual Basic中调用过程时,参数有两种传递形式:按值传递(Byval)和按址传递(Byref),默认为按址传递。其中,当参数按址传递时,如果在引用该参数的过程中改变了形参的值,同时也就改变了传递参数时实参变量的值。本题中funl的参数m是按值传递的,n是按地址传递的,因此在funl中对m的改变不会影响实参x,对n的操作会影响实参y。
转载请注明原文地址:https://kaotiyun.com/show/TNGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
要在文本框获得焦点时操作文本框中的内容,应该在()事件过程中编写程序。
下列程序实现的功能是:当在窗体上单击时,将输出a1.txt文件中的数字字符的个数。PrivateSubform_Click()DimChAsString*1DimnAsIntegerOpen"c:\a1.txt"for
如果存在如下过程:PrivateFunctionFMax(a()AsInteger)DimFirstAsInteger,LastAsInteger,iAsIntegerFirst=LBound(a)
下面程序是由鼠标事件在窗体上画图,如果按下鼠标将可以画图,双击窗体可以清除所画图形。补充完整下面的程序。首先在窗体层定义如下变量:DimPaintStartAsBoolean编写如下事件过程:PrivateSubForm_Load
在窗体中添加一个命令按钮和一个文本框,并编写如下程序代码:PrivateSubCommand1_Click()k=0DoWhilek<70k=k+2k=k*k+k
为了使能在DOS或Windows下运行的可执行程序也可以在VisualBasic中调用,可通过调用函数来实现。
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimnumAsIntegernum=1DoUntiLnum>6
在KeyUp事件过程中,通过KeyCode参数判断用户的按键。假定键“B”的KeyCode值为66,则以下正确的说法是______。
以下关于函数过程的叙述中,正确的是()。
随机试题
患者,女,35岁。哮喘咳嗽,痰多气急,咳吐黄稠痰,微恶风寒,舌苔黄腻,脉滑数。治疗应选用()
A.小肠切除吻合术B.化脓性阑尾炎手术C.腹腔镜疝修补术D.结肠脾曲癌引起的急症肠梗阻手术E.胃后壁穿孔手术属于Ⅱ类切口的手术是()。
团队决策的方法通常有( )。
在西方音乐史上,被称为“交响乐之父”的是()。
某电视演员因一儿童电视剧而出名,某公司未经该演员许可将印有其表演形象的宣传海报大量用于玩具、书包、文具等儿童产品的包装和装潢上。对该公司的行为应如何定性?()
大凡在动荡的社会里,汉字的___________比较大,当一个社会稳定的时候,就会出现对汉字的整理和___________,比如战国时期文字就比较乱,出现很多的异体,秦统一之后,就开始整理文字,这就是社会发展提出的要求。填入画横线部分最恰当的一项是(
南越历史上著名的二征王是_______和征贰。公元57年,倭奴国王派使臣与汉通好,刘秀以“_______”金印相赠。
简述不作为及其成立条件。
在计算机中,控制器的作用是(1)。
ReadthetextbelowandanswerQuestions15-21.FORMALDRESSCODEFORCOMPANYEMPLOYEESAtTransitEuropean,thecomp
最新回复
(
0
)