首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
假定有如下的Sub过程: Sub sfun(x As Single,y As Single) t=x x=t/y y=t Mod y End Sub 在窗体上添加一个
假定有如下的Sub过程: Sub sfun(x As Single,y As Single) t=x x=t/y y=t Mod y End Sub 在窗体上添加一个
admin
2012-09-03
44
问题
假定有如下的Sub过程:
Sub sfun(x As Single,y As Single)
t=x
x=t/y
y=t Mod y
End Sub
在窗体上添加一个命令按钮(名为Commandl),然后编写如下事件过程:
Private Sub Commandl_Click()
Dim a As single
Dim b As single
a=5
b=4
sfum a,b
MsgBox a&chr(10)+chr(13)&b
End Sub
打开窗体运行后,单击命令按钮,消息框的两行输出内容分别为( )。
选项
A、1和1
B、1.25和1
C、1.25和4
D、5和4
答案
B
解析
本题考查VBA中参数传递的知识。在VBA的过程调用时,参数有两种传递方式:传址传递和传值传递。如果在过程声明时没有说明传递类型,则默认为传址传递,即形参的结果会传递给实参。本例就是传址传递,所以过程调用时x=a,也就是5;y=b,也就是4。在过程内x的值变为5,4也就是1.25,y的值变为5Mod 4也就是1。过程调用结束时x和y的值分别回送给a和b。
转载请注明原文地址:https://kaotiyun.com/show/jWup777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
有如下类定义:classPa{intk;public:Pa():k(0){}//①Pa(intn):k(n){}//②
已知函数f的原型是voidf(int*a,long&b);变量v1、v2的定义是:intv1;longv2;下列调用语句中正确的是()。
关于运算符重载,下列表述中正确的是()。
请使用VC6或使用[答题]菜单打开考生文件夹proj2下的工程proj2,此工程包含有一个源程序文件proj2.cpp,其中定义了Stack类和ArrayStack类。Stack是一个用于表示数据结构“栈”的类,栈中的元素是字符型数据。Stack
有如下程序:#includeusingnamespaeestd;classBase{protected:Base(){cout
请使用VC6或使用【答题】菜单打开考生文件夹proj3下的工程proj3,其中包含了类IntegerSet和主函数main的定义。一个IntegerSet对象就是一个整数的集合,其中包含0个或多个无重复的整数;为了便于进行集合操作,这些整数按升序存放在成员
数据管理技术发展的三个阶段中,()没有专门的软件对数据进行管理。Ⅰ.人工管理阶段Ⅱ.文件系统阶段Ⅲ.数据库阶段
如果派生类以protected方式继承基类,则原基类的protected成员和public成员在派生类中的访问属性分别是()。
数据库系统在其内部具有3级模式,用来描述数据库中全体数据的全局逻辑结构和特性的是()。
随机试题
以下哪一项描述最支持眼眶原发炎性假瘤的诊断
患者,55岁。绝经6年,阴道不规则流血1个月收入院。体形肥胖,尿糖(+)。妇科检查:外阴、阴道萎缩不明显,宫体稍大、软,活动良,附件(一)。此病例最可能的诊断
地方派出机构有以下类别()。
横向推出式辊道分拣机动作比较柔和,适用于分拣易翻倒或易碎物品。()
下列物权中属于用益物权的是()。
阅读材料,回答下列问题。2019年6月,全国发行地方政府债券8996亿元,同比增长68.37%,环比增长195.63%。其中,发行一般债券3178亿元,同比减少28.33%,环比增长117.08%,发行专项债券5818亿元,同
真正美丽的生命执著地追求着真善,它不会_______地扭曲自己的形象,涂改自己灵动的线条,更不会让自己美丽的底色染上尘污。填入画横线部分最恰当的一项是()。
【B1】【B2】
Lookatthefollowingopinionsordeedsandthelistofpeoplebelow.Matcheachopinionordeedwiththecorrectperson,A,
InAmericanhighschoolstoday,it’stakenasagiventhatextracurricular(课外的)activitiesbringstudentsofdifferentracesto
最新回复
(
0
)