首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
假定有如下的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
55
问题
假定有如下的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全国计算机二级
相关试题推荐
执行下列语句段后,输出字符"*"的个数是()。for(inti=50;i>1;i-=2)cout
在C++中,编译系统自动为一个类生成默认构造函数的条件是
关系数据库管理系统能实现的专门关系运算包括()。
要定义整型数组x,使之包括初值为1的三个元素,下列语句正确的是
有如下函数原型:intfunc(int**a,int*b,int&cintd);其中可称为引用参数的参数变量是
有三个关系R,S和T如下:其中关系T由关系R和S通过某种操作得到,该操作为()。
有如下语句序列:charstr[10];cin>>str;当从键盘输入“Ilovethisgame”时,str中的字符串是()。
使用VC6打开考生文件夹下的源程序文件modi2.cpp。请完成函数fun(char*data),此函数的功能是,找出字符串数组中最小的ASCII值,如果有相同变量,则输出最后一个所在的位置;如果字符串为空,则返回一1;或者不存在时也返回一1。注
请使用VC6或使用【答题】菜单打开考生文件夹proj3下的工程proj3,其中包含主程序文件main.cpp和用户定义的头文件Array.h,整个程序包含有类Array的定义和主函数main的定义。请把主程序文件中的Array类的成员函数Contrary(
某个窗体已编写如下事件过程。打开窗体运行后,单击窗体,消息框的输出结果为______。PrivateSubForm_Click()DimKasInteger,nasInteger,masIntegern=10:m=1:k=1DoWhileK<=n
随机试题
关于企业联盟的说法,正确的有()。
缝焊时,焊缝边缘距焊件的边缘应()。
慢性淋巴细胞白血病90%的病人在何年龄段发病
某股份有限公司股本为1000万元(每股面值1元),资本公积(股本溢价)为150万元,盈余公积为100万元。经股东大会批准以每股3元价格回购本公司股票100万股并予以注销,不考虑其他因素,下列关于该公司注销库存股的会计处理正确的是()。
下列各组中的反应,属于同一反应类型的是()。
【2014.湖南郴州】加强自身的学习,是教师师德修养的必要途径。()
2008年9月25日,我国神舟七号航天飞船成功飞入太空实现的是载人飞行。()
(江苏2008A—13)已知奇数数列为an,则该数列满足不等式的所有项的和为()。
TryingtogetAmericanstoeatahealthydietisafrustratingbusiness.Eventhebest-designedpublic-healthcampaignscannots
Ahandfulofcash-richcompaniesareconsolidatingpowerinthetechnologyindustry,usingtheirwealthtoexpandintonewbusin
最新回复
(
0
)