首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
假定有如下的Sub过程: Sub sfun(x As Single,Y As Single) t=x:x=t/y y=t Mod y End Sub 在窗体上添加一个命令按钮(名为Commandl),然后编写如下事件
假定有如下的Sub过程: Sub sfun(x As Single,Y As Single) t=x:x=t/y y=t Mod y End Sub 在窗体上添加一个命令按钮(名为Commandl),然后编写如下事件
admin
2017-03-31
55
问题
假定有如下的Sub过程:
Sub sfun(x As Single,Y As Single)
t=x:x=t/y
y=t Mod y
End Sub
在窗体上添加一个命令按钮(名为Commandl),然后编写如下事件过程:
Private Sub Command l—Click()
Dim a as single,b as single
a=5:b=4
sfun 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
解析
本题考查V:BA中参数传递的知识。在VBA的过程调用时,参数有两种传递方式:传址传递和传值传递。如果在过程声明时没有说明传递类型,则默认为传址传递,即形参的结果会传递给实参。本例就是传址传递,所以过程调用时x=a,也就是5:y=b,也就是4。在过程内x的值变为5/4也就是1.25,y的值变为5Mod4也就是1。过程调用结束时x和y的值分别回送给a和b,所以选项B正确。
转载请注明原文地址:https://kaotiyun.com/show/zegp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
现有一个登录窗体如下图所示。打开窗体后输入用户名和密码,登录操作要求在20秒内完成,如果在20秒内没有完成登陆操作,则倒计时达到0秒时自动关闭本窗体,窗体的右上角是显示倒计时的标签labtime。事件代码如下,要求填空完成事件过程。
在程序设计阶段应该采取()和逐步求精的方法,把一个模块的功能逐步分解,细化为一系列具体的步骤,继而用某种程序设计语言写成程序。
假设已在Access中建立了包含“姓名”、“基本工资”和“奖金”三个字段的职工表,以该表为数据源创建的窗体中,有一个计算实发工资的文本框,其控件来源为()。
“是/否”数据类型常被称为()。
下列叙述中,错误的是()。
不属于VBA提供的程序运行错误处理的语句结构是()。
下列工具中为需求分析的常用工具的是()。
下列子过程的功能是:当前数据库文件中的“学生表”的学生“年龄”都加1,请在程序空白处填写适当的语句,使程序实现所需的功能。
已经设计出一个表格式窗体,可以输出教师表的相关字段信息。请按照以下功能要求补充设计:改变当前记录,消息框弹出提示“是否删除该记录?”,单击“是”,则直接删除该当前记录;单击“否”,则什么都不做。其效果如下:单击“退出”按钮,关闭窗体。Priv
下列标识符不是关键字的是()。
随机试题
费尽心机:弄巧成拙
Whatisinthedrugthatmakesyousickordead?【C1】______,cocaineisharmful,butwhatmakesitharmful?Ican’ttellyou
Ⅰ型呼吸衰竭的主要指标是
患者,男性,50岁,以特发性血小板减少性紫癜收入院,最常见的出血部位为()。
外伸梁受力如图所示,为了不使支座A产生垂直反力,集中荷载P的值应为()kN。
根据《职业病防治法》(2018年12月29日修正)的规定。新建厂房投入使用后,需要实行特殊管理的作业是()。
根据以下混合资料,回答问题。2008年A省粮食作物播种面积2499.94千公顷,比上年增长0.8%。糖蔗种植面积136.04千公顷,下降1.2%;油料种植面积323.87千公顷,增长4.3%;蔬菜种植面积1112.63千公顷,增长4.5%。2008年A
根据资料,回答下列问题:2012年,某地区农作物播种总面积达到1625.55万亩,同比增长4.6%。其中,粮食和蔬菜播种面积大幅增长,分别为459.40万亩、109.06万亩,同比增长32.7%和30.5%;棉花、油料和甜菜播种面积下降,分别为698.
Whatarethetwospeakersgoingtodo?
PresidentMahmoudAhmadinejadofIranhasorderedextrasecurityforscientistsbecauseofthedrive-byassassinationlastweek
最新回复
(
0
)