首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体中有一个命令按钮Commandl,编写事件代码如下: Private Sub Commandl_Click() Dim s As Integer s=P(1)+P(2)+P(3)+P(4) deb
在窗体中有一个命令按钮Commandl,编写事件代码如下: Private Sub Commandl_Click() Dim s As Integer s=P(1)+P(2)+P(3)+P(4) deb
admin
2020-06-25
68
问题
在窗体中有一个命令按钮Commandl,编写事件代码如下:
Private Sub Commandl_Click()
Dim s As Integer
s=P(1)+P(2)+P(3)+P(4)
debug.Print s
End Sub
Public Function P(N As Integer)
Dim Sum As Integer
Sum=0
For i=1 To N
Sum=Sum+i
Next i
P=Sum
End Function
打开窗体运行后,单击命令按钮,输出结果是( )。
选项
A、15
B、20
C、25
D、35
答案
B
解析
题目中在命令按钮的单击事件中调用了过程P。而过程P的功能是根据参数N,计算从1到N的累加,然后返回这个值。N=1时,P(1)返回1,N=2时,P(2)返回3,N=3时,P(3)返回6,N=4时,P(4)返回10,所以s=l+3+6+10=20。
转载请注明原文地址:https://kaotiyun.com/show/6Qcp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计了表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。同时,给出窗体对象“fEmp”的若干事件代码,试按以下功能要求补充设计。(1)设置系统相关
(1)有一个名为samp1.accdb的数据库。试修改职工表“employee”的结构,在“职工号”字段后增加“姓名”字段,其数据类型为文本型,长度为6,并对应职工号添加其姓名,见表2.6。(2)判断并设置表“employee”的主键,同时将上
在考生文件夹下有一个数据库文件“samp3.accdb”,其中存在设计好的表对象“tStud”和查询对象“qStud”,同时还设计出以“qStud”为数据源的报表对象“rStud”。请在此基础上按照以下要求补充报表设计。(1)在报表的报表页眉节区
在考生文件夹下有一个数据库文件“samlp2.acedb”,里面已经设计好了一个关联的表对象“tStud”、“tScore”、“tCourse”和一个空表“tTemp”,请按以下要求完成设计。(1)创建一个查询,查找并显示年龄在18~20岁之间(
在考生文件夹下有一个数据库文件“samp1.accdb”。在数据库文件中已经建立了一个表对象“学生基本情况”。根据以下操作要求,完成各种操作。在“家长身份证号”和“语文”两字段间增加一个字段,名称为“电话”,类型为文本型,大小为12。
下列关于货币数据类型的叙述中,错误的是
Access数据库中,用于输入或编辑字段数据的交互控件是
下列能够交换变量x和Y值的程序段是
假设有一组数据:工资为800元,职称为“讲师”,性别为“男”,在下列逻辑表达式中结果为“假”的是
下列关于Access数据流特点的叙述中,错误的是
随机试题
一次事故中死亡职工在( )的事故称为死亡事故。
Buttheydidfindthatwhoappearsinadreamhasa______greaterinfluenceonmoodthanwhatoccursinthedream.
表示自动曝光控制的英文宿写是
某高层建筑主楼采用单元式隐框玻璃幕墙,A公司作为设计和施工双甲级资质的专业公司,承接了幕墙的设计和施工任务,并根据B设计院的建筑图、结构图进行了幕墙施工图的深化设计,并在C试验室进行了“三性试验”。该幕墙系统采用了断桥铝型材和钢化中空LOW—E玻璃,单元板
智育的根本任务是()。
未成年人及不能辨认自己行为的精神病人的权益遭到行政机关及其工作人员的违法行使职权造成损害的,赔偿请求人是()。
试述内隐记忆与外显记忆各自的含义及它们之间的区别。
[*]
下列关于路由器技术指标的描述中,错误的是()。
Youwillhearfivedifferentbusinesstelephonecalls.Foreachextracttherearetwotasks.ForTaskOne,choosethereceiver’s
最新回复
(
0
)