首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计了表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。试在此基础上按照以下要求补充设计: 在窗体加载事件中实现代码重置窗体标题为标签“bTitle”的标
考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计了表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。试在此基础上按照以下要求补充设计: 在窗体加载事件中实现代码重置窗体标题为标签“bTitle”的标
admin
2015-12-21
64
问题
考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计了表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。试在此基础上按照以下要求补充设计:
在窗体加载事件中实现代码重置窗体标题为标签“bTitle”的标题内容。
(4)“fEmp”窗体上单击“输出”命令按钮(名为“btnP”),实现以下功能:计算10000以内的素数个数及最大素数两个值,将其显示在窗体上名为“tData”的文本框内并输出到外部文件保存。
单击“打开表”命令按钮(名为“btnQ”),代码调用宏对象“mEmp”以打开数据表“tEmp”。
试根据上述功能要求,对已给的命令按钮事件过程进行代码补充并调试运行。
选项
答案
步骤1:单击【窗体设计工具-设计】功能区的【工具】分组中的“查看代码”按钮,打开“代码设计器”窗口。 在“*****Add1****”行之间输入代码: Caption=bTitle.Caption 在“*****Add2****”行之间输入代码: Dim iAs Integer n=0 For i=0 T0 10000 If sushu(i)=True Then n=n+1 ITln=i EndI f Next i 在“*****Add3****”行之间输入代码: DoCm&RnnMacro"mEmp" 步骤2:双击“窗体”面板中的“fEmp”窗体,运行窗体文件,然后单击窗体中的“输出”按钮,输出结果。 步骤3:单击快速访问工具栏中的“保存”按钮,关闭代码窗口。
解析
转载请注明原文地址:https://kaotiyun.com/show/6tgp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
在窗体上添加一个名称为Command1的命令按钮,然后编写如下程序:PrivateSubf(ByVa1xAsInteger)x=x+4EndSubPrivateSubCommand1_Click()
设有以下窗体单击事件过程:PrivateSubForm_Click()a=1Fori=lTo3SelectCaseiCase1,3a=a+1Case
下列不属于操作查询的是()。
数据库系统其内部分为三级模式,即概念模式、内模式和外模式。其中,______是用户的数据视图,也就是用户所见到的数据模式。
Access中表和数据库的关系是()。
若有如下二叉树,则对此二叉树前序遍历的结果为()。
在窗体上添加一个命令按钮(名为Command1)和一个文本框(名为Text1),并在命令按钮中编写如下事件代码:PrivateSubCommand1_Click()m=2.17n=Len(Str
在Access2003中,通过“格式”菜单栏中的“背景”子菜单,不能设置()。
使用表设计器定义表中字段时,不是必须设置的内容是【】。
随机试题
民警甲发现李某正在殴打徐某,附近群众聚集围观。甲经警告无效,遂要求围观群众远离并使用警棍制服李某。民警使用警棍的行为是合法的。
A、子宫底高度在脐耻之间B、子宫底高度在脐上一横指C、子宫底高度在脐上三横指D、子宫底高度在剑突与脐之间E、子宫底高度在剑突下二横指妊娠32周末
不属于转录后修饰的是
信号u(t)=10.1(t)-10.1(t-1)V。其中,1(t)表示单位阶跃函数,则u(t)应为()。[2016年真题]
在国际工程项目报价构成中,业务费属于()。
某企业2016年在筹建期间发生支出1330万元,其中人员工资200万元,办公用品费用300万元,各项与筹建有关的注册、证照、咨询费用20万元,业务招待费60万元,业务宣传费150万元,购置生产设备600万元,进入经营期时,该企业选择一次性扣除筹建期费用的方
吉尔福特的三维智力理论认为人的智力有()种。
下列属于第四学段(7—9年级)课外阅读总量的一项是()。
在条件宏设计时,对于连续重复的条件,要替代重复条件式可以使用下面的符号______。
预览主/子报表时,子报表页面页眉中的标签()。
最新回复
(
0
)