计算机二年级Access窗体功能补充事件代码设计.docx
- 文档编号:28318395
- 上传时间:2023-07-10
- 格式:DOCX
- 页数:14
- 大小:26.44KB
计算机二年级Access窗体功能补充事件代码设计.docx
《计算机二年级Access窗体功能补充事件代码设计.docx》由会员分享,可在线阅读,更多相关《计算机二年级Access窗体功能补充事件代码设计.docx(14页珍藏版)》请在冰豆网上搜索。
计算机二年级Access窗体功能补充事件代码设计
文件排版存档编号:
[UYTR-OUPT28-KBNTL98-UYNN208]
计算机二年级Access窗体功能补充事件代码设计
一、在窗体中还有“修改”和“保存”两个命令按钮,名称分别为“CmdEdit”和“CmdSave”,其中“保存”命令按钮在初始状态为不可用,当单击“修改”按钮后,“保存”按钮变为可用,同时在窗体的左侧显示出相应的信息和可修改的信息。
如果在“口令”文本框中输入的内容与在“确认口令”文本框中输入的内容不相符,当单击“保存”按钮后,屏幕上应弹出如下图所示的提示框。
现已编写了部分VBA代码,请按照VBA代码中的指示将代码补充完整。
【解题步骤】
步骤1:
在设计视图中右键单击命令按钮“保存”选择【事件生成器】,在空行内输入代码:
********Add*********
MsgBox“请重新输入口令!
”,vbOKquit
********Add*********
步骤2:
关闭界面,单击工具栏中“保存”按钮,关闭设计视图。
二、在窗体中有一个“显示全部记录”命令按钮(名称为bList),单击该按钮后,应实现将“tStudent”表中的全部记录显示出来的功能。
现已编写了部分VBA代码,请按照VBA代码中的指示将代码补充完整。
要求:
修改后运行该窗体,并查看修改结果。
注意:
不允许修改窗体对象“fQuery”和“fStudent”中未涉及的控件和属性;不允许修改表对象“tStudent”。
对于VBA代码,只允许在“************”与“**********”之间的一空行内补充语句、完成设计,不允许增删和修改其它位置已存在的语句。
【解题步骤】
步骤1:
右键单击“显示全部记录”命令按钮选择【事件生成器】。
步骤2:
在空行内输入代码:
***请在下面双引号内添入适当的SELECT语句***
*******************
步骤3:
关闭界面。
步骤4:
单击工具栏中“保存”按钮,关闭设计视图。
步骤5:
双击窗体“fQuery”,单击“显示全部记录”按钮,查看该窗体运行结果。
三、补充事件代码,实现功能:
单击“退出”按钮(名为“bt2”),关闭窗体。
注意:
不允许修改数据库中的表对象“tEmp”;不允许修改查询对象“qEmp”中未涉及的内容;不允许修改窗体对象“fEmp”中未涉及的控件和属性;已给事件过程,只允许在“*****Add*****”与“*****Add*****”之间的空行内补充语句、完成设计,不允许增删和修改其它位置已存在的语句。
【解题步骤】
步骤1:
右键单击命令按钮“bt2”选择【事件生成器】。
在空行内输入代码:
*****Add*****
*****Add*****
步骤2:
关闭界面。
步骤3:
单击工具栏中“保存”按钮,关闭设计视图。
四、按照以下窗体功能,补充事件代码设计。
在窗体的四个文本框内输入合法的职工信息后,单击“追加”按钮(名为bt1),程序首先判断职工编号是否重复,如果不重复则向表对象“tEmp”中添加职工纪录,否则出现提示;当单击窗体上的“退出”按钮(名为bt2)时,关闭当前窗体。
注意:
不允许修改表对象“tEmp”中未涉及的结构和数据;不允许修改窗体对象“fEmp”中未涉及的控件和属性;代码设计只允许在“*****Add*****”与“*****Add*****”之间的空行内补充语句、完成设计,不允许增删和修改其它位置已存在的语句。
【操作步骤】
步骤1:
右键单击命令按钮“追加”选择【事件生成器】,在空行输入代码:
*****Add1*****
IfNotThen
*****Add1*****
步骤2:
关闭界面。
步骤3:
右键单击命令按钮“退出”选择【事件生成器】,在空行输入代码:
*****Add2*****
*****Add2*****
步骤4:
关闭界面。
单击工具栏中“保存”按钮,关闭设计视图。
五、单击“刷新”按钮(名为“bt1”),在事件过程中补充语句,动态设置窗体记录源为查询对象“qEmp”,实现窗体数据按性别条件动态显示退休职工的信息;单击“退出”按钮(名为“bt2”),调用设计好的宏“mEmp”来关闭窗体。
注意:
不允许修改数据库中的表对象“tEmp”和宏对象“mEmp”;不允许修改查询对象“qEmp”中未涉及的属性和内容;不允许修改窗体对象“fEmp”中未涉及的控件和属性;已给事件过程,只允许在“*****”与“*****”之间的空行内补充语句、完成设计,不允许增删和修改其它位置已存在的语句。
【解题步骤】
步骤1:
右键单击命令按钮“刷新”选择【事件生成器】,在空行内输入代码:
*****
="qEmp"
*****
步骤2:
关闭界面。
步骤3:
右键单击命令按钮“退出”选择【属性】,在“事件”选项卡下“单击”行右侧下拉列表中选中“mEmp”,关闭属性界面。
步骤4:
单击工具栏中“保存”按钮,关闭设计视图。
六、在窗体中有一个“退出”命令按钮(名称为bQuit),单击该按钮后,应关闭“fStudent”窗体。
现已编写了部分VBA代码,请按照VBA代码中的指示将代码补充完整。
要求:
修改后运行该窗体,并查看修改结果。
注意:
不允许修改窗体对象“fGrade”和“fStudent”中未涉及的控件和属性;不允许修改表对象“tStudent”和“tGrade”。
对于VBA代码,只允许在“*****************”与“****************”之间的空行内补充语句、完成设计,不允许增删和修改其它位置已存在的语句。
(5)【解题步骤】
步骤1:
右键单击命令按钮“退出”选择【事件生成器】。
输入代码:
******请在下面填入一行语句*******
***********************
步骤2:
关闭属性界面。
步骤3:
单击工具栏中“保存”按钮,关闭设计视图。
步骤4:
运行该窗体,查看运行结果。
七、补充窗体“fTest”上“test1”按钮(名为“bt1”)的单击事件代码,实现以下功能:
打开窗体,在文本框“tText”中输入一段文字,然后单击窗体“fTest”上“test1”按钮(名为“bt1”),补充代码设置窗体上标签“bTitle”的标题为文本框“tText”输入内容与文本串“等级考试测试”的连接并消除连接串的前导和尾随空白字符。
注意:
不允许修改窗体对象“fTest”中未涉及的控件和属性;只允许在“*****Add1*****”与“*****Add1*****”之间的空行内补充语句、完成设计。
【解题步骤】
步骤1:
选中“窗体”对象,右键单击“fTest”选择【设计视图】。
步骤2:
右键单击“test1”选择【事件生成器】,空行内输入代码:
*****Add1*****
=Trim(me!
tText+"等级考试测试")
*****Add1*****
八、在“fEmp”窗体上单击“输出”命令按钮(名为“btnP”),实现以下功能:
计算Fibonacci数列第19项的值,将结果显示在窗体上名为“tData”的文本框内并输出到外部文件保存;单击“打开表”命令按钮(名为“btnQ”),调用宏对象“mEmp”以打开数据表“tEmp”。
Fibonacci数列:
调试完毕,必须单击“输出”命令按钮生成外部文件,才能得分。
试根据上述功能要求,对已给的命令按钮事件过程进行补充和完善。
注意:
不允许修改数据库中的宏对象“mEmp”;不允许修改窗体对象“fEmp”和报表对象“rEmp”中未涉及的控件和属性;不允许修改表对象“tEmp”中未涉及的字段和属性;已给事件过程,只允许在“*****Add*****”与“****Add*****”之间的空行内补充语句、完成设计,不允许增删和修改其它位置已存在的语句。
【解题步骤】
步骤1:
右键单击命令按钮“输出”选择【事件生成器】,在空行相应位置输入如下代码:
*****Add1*****
Dimf(19)AsInteger
*****Add1*****
*****Add2*****
f(i)=f(i-1)+f(i-2)
*****Add2*****
*****Add3*****
tData=f(19)
*****Add3*****
步骤2:
关闭界面。
步骤3:
单击工具栏中“保存”按钮,关闭设计视图。
步骤4:
双击“fEmp”窗体,将其在窗体视图下打开,然后单击窗体上的“输出”命令按钮,生成外部文件,最后关闭窗体。
九、试根据以下窗体功能要求,对已给的命令按钮事件过程进行补充和完善。
在“fEmp”窗体上单击“输出”命令按钮(名为“btnP”),弹出一输入对话框,其提示文本为“请输入大于0的整数值”。
输入1时,相关代码关闭窗体(或程序);
输入2时,相关代码实现预览输出报表对象“rEmp”;
输入>=3时,相关代码调用宏对象“mEmp”以打开数据表“tEmp”。
注意:
不允许修改数据库中的宏对象“mEmp”;不允许修改窗体对象“fEmp”和报表对象“rEmp”中未涉及的控件和属性;不允许修改表对象“tEmp”中未涉及的字段和属性;已给事件过程,只允许在“******Add******”与“******Add******”之间的空行内补充语句、完成设计,不允许增删和修改其它位置已存在的语句。
【解题步骤】
步骤1:
右键单击命令按钮“输出”选择【事件生成器】,空行内输入代码:
*****Add1*****
k=InputBox("请输入大于0的整数")
*****Add1*****
*****Add2*****
"rEmp",acViewPreview
*****Add2*****
步骤2:
单击工具栏中“保存”按钮,关闭设计视图。
十、在窗体中还有“修改”和“保存”两个命令按钮,名称分别为“CmdEdit”和“CmdSave”,其中“保存”命令按钮在初始状态为不可用,当单击“修改”按钮后,“保存”按钮变为可用。
现已编写了部分VBA代码,请按照上述功能要求将VBA代码补充完整。
要求:
修改后运行该窗体,并查看修改结果。
注意:
不允许修改窗体对象“fEdit”和“fEuser”中未涉及的控件和属性;不允许修改表对象“tAddr”和“tUser”。
已给事件过程,只允许在“******Add*****”与“*****Add*****”之间的空行内补充一行语句、完成设计,不允许增删和修改其它位置已存在的语句。
【解题步骤】
步骤1:
右键单击命令按钮“修改”选择【事件生成器】,在空格行输入:
********Add**********
=True
********Add**********
步骤2:
关闭界面。
步骤3:
单击工具栏中“保存”按钮,关闭设计视图。
步骤4:
双击窗体“fEdit”,单击“修改”按钮,查看运行结果。
十一、补充窗体“fTest”上“test1”按钮(名为“bt1”)的单击事件代码,实现以下功能:
打开窗体,在文本框“tText”中输入一段文字,然后单击窗体“fTest”上“test1”按钮(名为“bt1”),程序实现将文本框内容作为窗体上的标签“bTitle”的标题显示。
注意:
不允许修改窗体对象“fTest”中未涉及的控件和属性;只允许在“*******Add******”与“********Add********”之间的空行内补充语句、完成设计。
【解题步骤】
步骤1:
选中“窗体”对象,右键单击“fTest”选择【设计视图】。
步骤2:
右键单击“test1”按钮选择【事件生成器】,在空行内输入:
*****Add*****
=tText
*****Add*****
步骤3:
关闭界面。
十二、试根据以下窗体功能要求,对已给的命令按钮事件过程进行补充和完善。
在“fEmp”窗体上单击“输出”命令按钮(名为“btnP”),弹出一输入对话框,其提示文本为“请输入大于0的整数值”。
输入1时,相关代码关闭窗体(或程序);
输入2时,相关代码实现预览输出报表对象“rEmp”;
输入>=3时,相关代码调用宏对象“mEmp”以打开数据表“tEmp”。
注意:
不允许修改数据库中的宏对象“mEmp”;不允许修改窗体对象“fEmp”和报表对象“rEmp”中未涉及的控件和属性;不允许修改表对象“tEmp”中未涉及的字段和属性;已给事件过程,只允许在“*****Add*****”与“*****Add*****”之间的空行内补充语句、完成设计,不允许增删和修改其它位置已存在的语句。
【解题步骤】
步骤1:
右键单击命令按钮“输出”选择【事件生成器】,在空行内输入代码:
*****Add1*****
CaseIs>=3
*****Add1*****
*****Add2*****
"rEmp",acViewPreview
*****Add2*****
步骤2:
关闭界面。
步骤3:
单击工具栏中“保存”按钮,关闭设计视图。
十三、按照以下窗体功能,补充事件代码设计。
窗体功能:
打开窗体、单击“计算”按钮(名为bt),事件过程使用ADO数据库技术计算出表对象“tEmp”中党员职工的平均年龄,然后将结果显示在窗体的文本框“tAge”内并写入外部文件中。
注意:
不允许修改数据库中表对象“tEmp”未涉及的字段和数据;不允许修改窗体对象“fEmp”中未涉及的控件和属性。
代码设计只允许在“*****Add*****”与“*****Add******”之间的空行内填补一行语句、完成设计,不允许增删和修改其它位置已存在的语句。
程序必须运行并生成外部文件()后才能得分。
【解题步骤】
步骤1:
选中“窗体”对象,右键单击“fEmp”选择【设计视图】。
步骤2:
右键单击命令按钮“计算”选择【事件生成器】,在空行内输入代码:
*****Add1******
IfThen
*****Add1******
*****Add2******
tAge=sage
*****Add2******
步骤3:
关闭界面,单击工具栏中“保存”按钮。
步骤4:
单击菜单栏【视图】|【窗体视图】,单击“计算”命令按钮,生成外部文件。
十四、在窗体中还有“修改”和“保存”两个命令按钮,名称分别为“CmdEdit”和“CmdSave”,其中“保存”命令按钮在初始状态为不可用,当单击“修改”按钮后,应使“保存”按钮变为可用。
现已编写了部分VBA代码,请按照VBA代码中的指示将代码补充完整。
要求:
修改后运行该窗体,并查看修改结果。
注意:
不允许修改窗体对象“fEdit”和“fEuser”中未涉及的控件和属性;不允许修改表对象“tAddr”和“tUser”。
对于VBA代码,只允许在“***************”与“***************”之间的空行内补充语句、完成设计,不允许增删和修改其它位置已存在的语句。
【解题步骤】
步骤1:
在设计视图中右键单击命令按钮“修改”选择【事件生成器】,在空行内输入代码:
*******请在下面添加一条语句*****
=True
***********************
步骤2:
关闭界面。
步骤3:
单击菜单栏【视图】|【窗体视图】,单击“修改”命令按钮,查看运行结果。
十五、在窗体对象“fEmp”上有“刷新”和“退出”两个命令按钮,名称分别为“bt1”和“bt2”。
单击“刷新”按钮,窗体记录源改为查询对象“qEmp”;单击“退出”按钮,关闭窗体。
现已编写了部分VBA代码,请按VBA代码中的指示将代码补充完整。
注意:
不允许修改数据库中的表对象“tEmp”;不允许修改查询对象“qEmp”中未涉及的内容;不允许修改窗体对象“fEmp”中未涉及的控件和属性。
程序代码只允许在“*****Add*****”与“*****Add*****”之间的空行内补充一行语句、完成设计,不允许增删和修改其它位置已存在的语句。
【解题步骤】
步骤1:
右键单击命令按钮“刷新”选择【事件生成器】,在空行内输入代码:
*****Add1*****
="qEmp"
*****Add1*****
步骤2:
关闭界面。
步骤3:
右键单击命令按钮“退出”选择【事件生成器】,在空行内输入代码
*****Add2*****
*****Add2*****
步骤4:
关闭界面。
单击工具栏中“保存”按钮,关闭设计视图。
十六、在窗体中有一个“退出”命令按钮,名称为“CmdQuit”,其功能为关闭“fStud”窗体。
请按照VBA代码中的指示将实现此功能的代码填入指定的位置中。
注意:
不允许修改窗体对象“fStud”中未涉及的控件和属性;不允许修改表对象“tStud”。
程序代码只允许在“*****Add*****”与“*****Add*****”之间的空行内补充一行语句、完成设计,不允许增删和修改其它位置已存在的语句。
【解题步骤】
步骤1:
右键单击“退出”命令按钮选择【事件生成器】,在空行内输入代码:
*****Add*****
*****Add*****
步骤2:
关闭界面。
步骤3:
单击工具栏中“保存”按钮,关闭设计视图。
十七、补充窗体“fTest”上“test1”按钮(名为“bt1”)的单击事件代码,实现以下功能:
打开窗体,在文本框“tText”中输入一段文字,然后单击窗体“fTest”上的“test1”按钮(名为“bt1”),程序将文本框中的内容作为窗体中标签“bTitle”的标题显示。
注意:
不能修改窗体对象“fTest”中未涉及的控件和属性;只允许在“*****Add*****”与“*****Add*****”之间的空行内补充语句、完成设计。
【解题步骤】
步骤1:
选中“窗体”对象,右键单击“fTest”选择【设计视图】。
步骤2:
右键单击“test1”按钮选择【事件生成器】,在空行输入代码:
*****Add*****
=tText
*****Add*****
步骤3:
关闭界面。
十八、在窗体中有一个“退出”命令按钮(名称为bQuit),单击该按钮后应关闭“fStudent”窗体。
现已编写了部分VBA代码,请按照VBA代码中的指示将代码补充完整。
要求:
修改后运行该窗体,并查看修改结果。
注意:
不允许修改窗体对象“fStudent”中未涉及的控件和属性;不允许修改表对象“tStudent”。
程序代码只能在“*********”与“*********”之间的空行内补充一行语句、完成设计,不允许增删和修改其它位置已存在的语句。
【解题步骤】
步骤1:
右键单击“退出”命令按钮选择【事件生成器】。
在空行内输入代码:
******请在下面填入一行语句*******
***********************
步骤2:
关闭属性界面。
步骤3:
单击工具栏中“保存”按钮,关闭设计视图。
步骤4:
双击窗体对象“fStudent”,单击“退出”命令按钮,查看运行结果。
十九、窗体加载时将考生文件夹下的图片文件“”设置为窗体“fEmp”的背景。
窗体“加载”事件的部分代码已提供,请补充完整,要求背景图片文件当前路径必须用获得。
注意:
不能修改数据库中的表对象“tEmp”和宏对象“mEmp”;不能修改窗体对象“fEmp”和报表对象“rEmp”中未涉及的控件和属性。
程序代码只允许在“*****Add*****”与“*****Add*****”之间的空行内补充一行语句、完成设计,不允许增删和修改其它位置已存在的语句。
【解题步骤】
步骤1:
右键单击工具栏中“代码”按钮,进入编程环境,在空行内输入代码:
*****Add*****
=&“\\”
*****Add*****
步骤2:
关闭界面。
步骤3:
单击工具栏中“保存”按钮,关闭设计视图。
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 年级 Access 窗体 功能 补充 事件 代码 设计
![提示](https://static.bdocx.com/images/bang_tan.gif)