首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Commandl的命令按钮,其单击事件过程及相关的代码如下: Private Sub Commandl_Click() Dim x As Integer,y As Integer x=Val(InputBox(”输
窗体上有一个名称为Commandl的命令按钮,其单击事件过程及相关的代码如下: Private Sub Commandl_Click() Dim x As Integer,y As Integer x=Val(InputBox(”输
admin
2020-04-18
40
问题
窗体上有一个名称为Commandl的命令按钮,其单击事件过程及相关的代码如下:
Private Sub Commandl_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/HrTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列排序方法中,最坏情况下比较次数最少的是( )。
若在窗体模块的声明部分声明了如下自定义类型和数组:PrivateTyperecCodeAsIntegerCaptionAsStringEndTypeDimarr(5)Asrec则下面的输出语句中正确的是( )。
为了判断字符串变量strName中的姓名是否姓"李",应采用的表达式是
设窗体上有名称为Option1的单选按钮,且程序中有语句:IfOption1.Value=TrueThen下面语句中与该语句不等价的是( )。
下面关于多重窗体的叙述中,正确的是()。
负责数据库中查询操作的数据库语言是()。
设工程中有2个窗体:Form1、Form2,Form1为启动窗体。Form2中有菜单,其结构如表。要求在程序运行时,在Form1的文本框Text1中输入门令并按回车键(回车键的ASCII码为13)后,隐藏Form1,显示Form2。若口令为“XSLNCER
鼠标拖放控件要触发两个事件,这两个事件是( )。
下列数据结构中,能用二分法进行查找的是()。
要建立一个随机文件记录学生的信息,如下定义的学生记录类型,由学号、姓名和5门课程成绩(百分制)组成,下列的定义正确的是()。
随机试题
对于Windows7操作系统,下列叙述中正确的是()
A.头晕目眩B.神昏痴呆C.肢体麻木D.痰核瘰疬痰停经络可以引起
患者,男,69岁。情绪激动后突感剧烈压榨性胸痛、呕吐伴窒息感2小时入院。心率110次/分,血压82/60mmHg,心电图示V1~V4导联ST段弓背抬高,心律不齐。患者经静脉滴注硝酸甘油、吸氧,胸痛已缓解,护士告诉患者如何避免心绞痛发作的诱因,其内容不包
小型犬,雄性,5岁,体温38.6℃,排粪困难。X线平片显示直肠前段有中高密度阴影,直肠指检骨盆腔入口处有球形物压迫直肠。根治该病的有效方法是
抢救左心衰急性肺水肿时,下列措施中错误的是
城里人能够看到什么月亮?即使偶尔看到远远的天空上一丸灰白,但_______于无数路灯之中,磨损于各种噪音之中,稍纵即逝在丛林般的水泥高楼之间,不过像死鱼眼睛一只,丢弃在_______的垃圾里。填入画横线部分最恰当的一项是:
青少年牙周炎患者牙齿移位通常是()。
关于宪法修改的表述正确的是
Youwillhearaninterview.Foreachquestion(23-30),markoneletter(A,BorC)forthecorrectanswer.Afteryouhavelistened
Theprofessorisquitedifficultpleased.
最新回复
(
0
)