期末练习题(南)

期末练习题(南)

1.数据库文件\"samp19.mdb\"，里面已经设计了表对象\"tEmp\"和窗体对象\"fEmp\"。试按以下要求完成设计。 （1）设置窗体加载事件为窗体对象\"fEmp\"的标题为\"信息输出\"；

（2）已知窗体\"fEmp\"的三个命令按钮中，按钮\"bt1\" 和\"bt3\"的大小一致、且左对齐。现要求在不更改\"bt1\" 和\"bt3\"大小位置的基础上，调整按钮\"bt2\"的大小和位置，使其大小与\"bt1\"和\"bt3\"相同，水平方向左对齐\"bt1\" 和\"bt3\"，竖直方向在\"bt1\" 和\"bt3\"正中间的位置；

（3）修改查询对象\"qEmp\"为参数查询，参数为引用窗体对象\"fEmp\"上文本框\"tSS\"的输入值；

（4）单击\"查询\"按钮（名为\"bt2\"），事件过程动态设置窗体记录源为查询对象\"qEmp\"，实现窗体数据按性别条件动态显示记录，补充其代码；

（5）单击“退出”按钮后，关闭窗体，补充其代码。

2.数据库文件\"samp20.mdb\"里面已经设计好表对象\"tBand\"和\"tLine\"，同时还设计出以\"tBand\"和\"tLine\"为数据源的报表对象\"rBand\"。补充报表设计：

（1）在报表rBand的报表页眉节区位置添加一个标签控件，其名称为\"bTitle\"，标题显示为\"团队旅游信息表\"；将报表标题设置为\"团队旅游信息表\"；

（2）在\"导游姓名\"字段标题对应的报表主体区位置添加一个控件，显示出\"导游姓名\"字段值，并命名为\"tName\"；

（3）在报表的报表页脚区添加一个计算控件，要求依据\"团队ID\"来计算并显示团队的个数。计算控件放置在\"团队数：\"标签的右侧，计算控件名称为\"bCount\"； （4）将报表记录数据先按线路ID降序、再按出发日期降序排列；

（5）在报表的页面页脚区左侧插入当前系统日期，格式如“2012年5月”。 3.数据库文件\"smap17.mdb\"，里面已经设计好窗体对象\"教师\"。补充窗体设计：

（1）在窗体的窗体页眉节区位置添加一个标签控件，其名称为\"bTitle\"，标题显示为\"教师基本信息输出\"；添加一个按钮控件，编写VBA代码，使单击该按钮后，打开\"教师；表

（2）在主体节区中\"年龄\"标签右侧的文本框显示内容设置为\"年龄\"字段值，并将文本框名称更名为

\"tAge\"；

（3）在主体节区添加一个标签控件，该控件放置在距左边0.1厘米、距上边5.0厘米，标签显示内容为\"出生地\"，名称为\"bMem\"；

（4）在窗体页脚节区位置添加两个命令按钮，分别命名为\"bOk\"和\"bQuit\"，标题分别为\"确定\"和\"退出\"；设置两个命令按钮的Tab键索引顺序（即Tab键焦点移动顺序）为从\"退出\"按钮到\"确定\"按钮；

（5）在窗体主体节区添加一个命令按钮，命名为\"Btt\"，按钮标题为\"刷新标题\"，编写VBA代码，使单击该按钮后，窗体标题改为\"教师基本信息\"。

4.数据库文件\" smap18.mdb\"里面已经设计好表对象\"tEm\"和\"tGroup\"及查询对象\"qEm\"，同时还设计出以\"qEm\"为数据源的报表对象\"rEmp\"。按照以下要求补充报表设计：

（1）在报表的报表页眉节区位置添加一个标签控件，其名称为\"bTitle\"，标题显示为\"职工基本信息一览表\"，字号为20；

（2）在\"性别\"字段标题对应的报表主体节区距上边0.15厘米、距左侧5.2厘米位置添加一个文本框，显示出\"性别\"字段值，并命名为\"tSex\"；

（3）设置报表主体节区内文本框\"tDept\"的控件来源属性为“所属部门”字段值。在报表页脚节添加一个文本框控件，名称为tAge，来源属性为计算控件，该控件用来计算年龄的平均值； （4）将报表记录数据先按性别升序、再按年龄降序排列； （5）在页面底端插入页码，格式为“第N页/共M页”，左对齐。

5.数据库文件\"samp15.mdb\"里面已经设计好表对象\"tEmployee\"、\"tAttend\"和\"tWork\"，查询对象\"qT\"，宏对象\"m1\"，同时还设计出以\"tEmployee\"为数据源的窗体对象\"fEmployee\"和以\"qT\"为数据源的窗体对象\"fList\"。其中，\"fEmployee\"窗体对象中含有一个子窗体，名称为\"list\"。补充\"fEmployee\"窗体设计： （1）在窗体\"fEmployee\"的窗体页眉节区位置添加一个标签控件，其名称为\"bTitle\"，标题显示为\"职工

基本信息\"，字体名称为\"黑体\"，字号大小为24。

（2）在窗体\"fEmployee\"的窗体页眉节区距左边0.4厘米、距上边1.2厘米处添加一个直线控件，控件宽度为10.5厘米，控件命名为\"tLine\"；

（3）按如下控件顺序设置Tab键次序： \" Frame12\"→\"List\"→\"bList\"； （4）编写VBA代码，使单击性别选项组中的选项后窗体显示对应性别的记录；

（5）在窗体主体节区位置添加一个命令按钮，命名为\"bclose\"，按钮标题为\"关闭窗体\"，编写VBA代码，使单击该按钮后关闭窗体。

6.数据库文件\"samp16.mdb\"里面已经设计好表对象\"tEmployee\"和\"tGroup\"及查询对象\"qEmployee\"，同时

还设计出以\"qEmployee\"为数据源的报表对象\"rEmployee\"。补充报表设计：

（1）在报表的报表页眉节区位置添加一个标签控件，其名称为\"bTitle\"，标题显示为\"职工基本信息表\"；边框样式为点线，边框宽度为2磅；

（2）在\"性别\"字段标题对应的报表主体节区距上边0.1厘米、距左侧5.2厘米位置添加一个文本框，显示出\"性别\"字段值，并命名为\"tSex\"；

（3）设置报表主体节区内文本框\"tDept\"的控件来源属性为“所属部门”字段值。在报表页脚节添加一个文本框控件，名称为\"tCount\"，来源属性为计算控件，该控件用来统计总人数； （4）将报表记录数据先按职务升序、再按年龄降序排列；

（5）在报表页面页脚区域内添加一个名为\"tPage\"的文本框控件，设置为\"-页码-\"形式的页码显示（如-1-、-2-、...）。

7.考生文件夹下存在一个数据库文件\"samp13.mdb\"，里面已经设计好表对象\"tUser\"，同时还设计出窗体对象\"fEdit\"和\"fUser\"。请在此基础上按照以下要求补充\"fEdit\"窗体的设计： （1）窗体加载时将窗体中名称为\"lRemark\"的标签控件上的文字颜色改为\"红色\"；

（2）将窗体边框改为\"对话框边框\"样式，取消窗体中的水平和垂直滚动条、记录选择器、导航按钮和分隔线；将窗体标题设置为\"修改用户口令\"；

（3）将窗体中名称为\"tPass\"和\"tEnter\"文本框中的内容以密码方式显示； （4）按如下控件顺序设置Tab键次序：

\"CmdEdit\"→\"tUser_1\"→\"tRemark_1\"→\"tPass\"→\"tEnter\"→\"CmdSave\"→\"cmdquit\"→窗体右侧列表（标题是修改系统用户）；

（5）单击窗体上的\"退出\"按钮，关闭当前窗体。

8.数据库文件\"samp14.mdb\"里有表对象\"tEmp\"、窗体对象\"fEmp\"、报表对象\"rEmp\" 。补充报表设计： （1）建立一个新报表对象\"学生信息\"，以\"tEmp \"为记录源，在报表页眉中添加一个标签控件，输入标题\"学生信息一览表\"，设置标题格式：字号20，居中；

（2）依次将“编号、姓名、性别、年龄”字段拖放到报表对象\"学生信息\" 的“主体”节中，产生4个文本框控件（4个附加标签）；

（3）将主体节区的4个附加标签控件移到页面页眉节区，然后调整各个控件的大小，位置及对齐方式等；调整报表页面页眉节和主体节的高度，以合适的尺寸容纳其中的控件；

（4）设置报表按照\"年龄\"字段升序排列输出；在报表页脚区添加一个计算控件，命名为\"tAge\显示平均年龄；

（5）在报表的页面页脚区左侧插入当前系统日期，格式如“2013年5月”。

9.数据库文件\"samp11.mdb\"里面已经设计好表对象\"产品\"、\"供应商\"、查询对象\"按供应商查询\"和宏对象\"打开产品表\"、\"运行查询\"、\"关闭窗口\"。试按以下要求完成设计：创建一个名为\"menu\"的窗体，要求如下：

（1）对窗体进行如下设置：在距窗体主体左边1厘米、距上边0.6厘米处依次水平放置三个命令按钮\"显示修改产品表\"（名为\"bt1\"）、\"查询\"（名为\"bt2\"）和\"退出\"（名为\"bt3\"），命令按钮的宽度均为2厘米，高度为1.5厘米，每个命令按钮相隔1厘米；

（2）在窗体主体节区添加名称为\"tPass\"文本框，内容以密码方式显示；

（3）当单击\"显示修改产品表\"命令按钮时，就可以浏览\"产品\"表。编写事件过程代码打开\"产品\"表； （4）当单击\"查询\"命令按钮时，运行宏\"运行查询\"，即可启动查询\"按供应商查询\"； （5）当单击\"退出\"命令按钮时，关闭\"menu\"窗体。编写事件过程代码，运行宏\"关闭窗口\"。

10.数据库文件\"samp12.mdb\"，里面已经设计好表对象\"tTeacher\"、报表对象\"rTeacher\"。补充报表设计： （1）将报表对象rTeacher的报表页眉节内标签标题，设置为黑体，16号，特殊效果为凿痕；

（2）将报表对象rTeacher的报表主体节区中名为\"性别\"的文本框显示内容设置为\"性别\"字段值，并将文本框名称更名为\"tSex\"；

（3）在报表对象rTeacher的报表页脚节区位置添加一个计算控件，计算并显示教师的平均年龄（保留整数）。计算控件放置在距上边0.3厘米、距左侧3.6厘米，命名为\"tAvg\"；

（4）将主体节区内最右边插入文本框控件命名为\"tYear\"，依据报表记录源的\"年龄\"字段值计算并显示出其四位的出生年信息；注意：当前年必须用相关函数返回；=Year(Date())-[年龄] （5）在页面页脚区域内右侧插入页码。页码显示（如1/15、2/15、…）。 11.数据库文件\"samp9.mdb\"，里面已经设计好窗体对象\"教师\"。补充窗体设计：

（1）在窗体的窗体页眉节区位置添加一个标签控件，其名称为\"bTitle\"，标题显示为\"教师奖励信息\"；宽度3.5cm，高度0.7cm；字号为16；

（2）在主体节区位置添加一个选项组控件，将其命名为\"opt\"，选项组标签显示内容为\"奖励\"，名称为

\"bopt\"；

（3）在选项组内放置二个单选按钮控件，选项按钮分别命名为\"opt1\"和\"opt2\"，选项按钮标签显示内容

分别为\"有\"和\"无\"，名称分别为\"bopt1\"和\"bopt2\"；

（4）在窗体的窗体页眉节区位置添加一个标签控件，其名称为\"bb\"，窗体加载时显示系统日期； （5）在窗体页脚节区位置添加两个命令按钮，分别命名为\"bOk\"和\"bQuit\"，按钮标题分别为\"确定\"和\"退

出\"；编写VBA代码，使单击\"确定\"按钮后，窗体标题改为\"教师奖励信息\"；单击“退出”按钮后，窗体关闭。

12.数据库文件\"samp10.mdb\"里有表对象\"tEmp\"、报表对象\"rEmp\"。补充报表设计： （1）设置报表页眉中名称为\"bTitle\"的标签，“黑体”，20号，“加粗”，倾斜字体。

（2）设置报表\"rEmp\"按照\"性别\"字段分组降序排列输出，同时在其对应组页眉区添加一个文本框，命名为\"SS\"，内容输出为性别值；

（3）将报表页面页脚区域内名为\"tPage\"的文本框控件设置为\"页码/总页数\"形式的页码显示（如1/15、2/15、…）；

（4）在报表页脚节区添加一个计算控件，计算并显示学生最大年龄。计算控件放置在距上边0.2厘米、距左边6.5厘米，并命名为\"tMage\"；

（5）在报表页面页脚区域内添加一个文本框，显示当前系统日期，格式如“2013年5月”。

13.数据库文件\"samp7.mdb\"有表对象\"tEmp\"、查询对象\"qEmp\"和窗体对象\"fEmp\"。试按以下功能要求补充设计。

（1）设置窗体页眉节区名称为\"bTitle\"的标签，字号16，宽度3.5cm，高度0.7cm；

（2）将窗体\"fEmp\"上文本框\"tSS\"更改为组合框类型，并保持控件名称不变；设置其相关属性实现下拉列表形式输入性别\"男\"和\"女\"；

（3）修改查询对象\"qEmp\"为参数查询，参数为引用窗体对象\"fEmp\"上组合框\"tSS\"的输入值； [

Forms]![fEmp]![tSS]

（4）设置窗体对象\"fEmp\"上文本框\"tAge\"为计算控件。要求根据\"年龄\"字段值计算并显示人员的出生年； （5）补充事件代码:单击\"刷新\"按钮，事件过程动态设置窗体记录源为查询对象\"qEmp\"，实现窗体数据按性别条件动态显示职工的信息,单击\"退出\"按钮，关闭窗体；RecordSource = \"qEmp\"

14.数据库文件\"samp8.mdb\"里面已经设计好表对象\"tBorrow\"、\"tReader\"和\"tBook\"，查询对象\"qT\"，报表对象\"rReader\"。请在此基础上按照以下要求补充设计：

（1）在\"rReader\"报表的报表页眉节区内添加一个标签控件，其名称为\"bTitle\"，标题显示为\"读者借阅情况浏览\"；

（2）设置报表页眉中名称为\"bTitle\"的标签，字体名称为\"黑体\"，字号为18，同时将其安排在距上边0.5厘米、距左侧2厘米的位置；

（3）设计报表\"rReader\"的主体节区内\"tSex\"文本框控件依据报表记录源的\"性别\"字段值来显示信息； （4）按照\"性别\"字段分组，在组页脚中添加计算控件，统计并显示不同性别的人数；

（5）在报表页脚区域插入名为\"tPage\"的文本框控件实现以下格式的页码输出：\"1/20\。 15.数据库文件\"samp5.mdb\"里面已经设计好窗体对象\"fTest\"及宏对象\"m1\"。按照以下要求补充窗体设计： （1）在窗体的窗体页眉节区位置添加一个标签控件，其名称为\"bTitle\"，标题显示为\"窗体测试样例\"；窗体加载时标签字体为红色；

（2）在窗体主体节区内添加二个复选框控件，复选框选项按钮分别命名为\"opt1\"和\"opt2\"，对应的复选框标签显示内容分别为\"类型a\"和\"类型b\"，标签名称分别为\"bopt1\"和\"bopt2\"； （3）分别设置复选框选项按钮opt1和opt2的\"默认值\"属性为假值；

（4）在窗体页脚节区位置添加一个命令按钮，命名为\"bTest\"，按钮标题为\"测试\"；设置命令按钮bTest的单击事件属性为给定的宏对象m1；

（5）在窗体页脚节区位置添加两个命令按钮，按钮标题分别为\"修改\"和\"保存\"；编写VBA代码，使单击\"保存\"按钮后，修改按钮为不可用。

16.数据库文件\"samp6.mdb\"，里面已经设计了表对象\"tEmp\"、报表对象\"rEmp\"。要求补充设计： （1）将报表\"rEmp\"的报表页眉区域内名为\"bTitle\"标签控件的标题显示为\"职工基本信息表\"，同时将其安排在距上边0.5厘米、距左侧5厘米的位置；

（2）设置报表页眉中名称为\"bTitle\"的标签，字体名称为\"黑体\"，字号为20，字体加粗； （3）设置报表\"rEmp\"的主体节区内\"tSex\"文本框控件显示\"性别\"字段数据；

（4）将报表记录数据按照姓氏分组升序排列，同时要求在相关组页眉区域添加一个文本框控件（命名为\"tm\"），设置属性显示出姓氏信息来，如\"陈\"、\"刘\"、...等；Left([姓名],1) 注意，这里不用考虑复姓等特殊情况。所有姓名的第一个字符视为其姓氏信息。 （5）在报表页脚中添加一个计算控件，统计并显示总人数。

17.数据库文件\"samp3.mdb\"里面已经设计好表对象\"tAddr\"和\"tUser\"，同时还设计出窗体对象\"fEdit\"和\"fEuser\"。补充\"fEdit\"窗体的设计：

（1）将窗体\"fEdit\"中名称为\"Lremark\"的标签控件上的文字颜色改为\"蓝色\"、字体粗细改为\"加粗\"； （2）窗体加载时将窗体标题设置为\"显示/修改用户口令\"；在窗体页眉节区添加名称为\"tPass\"文本框，内容以“*”号方式显示；

（3）将窗体边框改为\"细边框\"样式，取消窗体中的水平和垂直滚动条、记录选择器、导航按钮和分隔线；并且保留窗体的关闭按钮；

（4）为\"退出\"按钮(名称为\"cmdquit\")编写VBA代码，使单击该按钮后关闭窗体；

（5）在窗体中还有\"修改\"和\"保存\"两个命令按钮，名称分别为\"CmdEdit\"和\"CmdSave\"，其中\"保存\"命令按钮在初始状态为不可用，当单击\"修改\"按钮后，\"保存\"按钮变为可用，同时在窗体的左侧显示出相应的18.数据库文件\"samp4.mdb\"里面已经设计了表对象\"tEmp\"、报表对象\"rEmp\"。试按以下功能要求补充设计。 （1）将\"rEmp\"报表页眉区域内的标签控件上的文字颜色改为\"红色\"、字体名称改为\"华文行楷\"、字号改为22；

（2）将报表\"rEmp\"的主体节区内\"姓名\"文本框控件设置为\"姓名\"字段内容显示，报表中的数据按\"年龄\"升序排列，相同年龄情况下按\"聘用时间\"升序排列；

信息和可修改的信息。现已编写了部分VBA代码，请按照VBA代码中的指示将代码补充完整。

（3）将\"rEmp\"报表页面页脚区域内名为\"tPage\"的文本框控件设置为\"页码/总页数\"形式页码显示； （4）将\"rEmp\"报表页脚区域内插入名称为\"tcount\"的文本框控件，并显示员工的总人数； （5）在报表页面页脚区域内添加一个文本框，显示当前系统日期。

19.数据库文件\"samp1.mdb\"里面已经设计了表对象\"tEmp\"、窗体对象\"fEmp\"。补充窗体设计： （1）将窗体\"fEmp\"上标签\"bTitle\"以特殊效果：阴影显示；字体名称为\"黑体\"；

（2）已知窗体\"fEmp\"的三个命令按钮中，按钮\"bt1\" 和\"bt3\"的大小一致、且左对齐。现要求在不更改\"bt1\" 和\"bt3\"大小位置的基础上，调整按钮\"bt2\"的大小和位置，使其大小与\"bt1\"和\"bt3\"相同，水平方向左对齐\"bt1\" 和\"bt3\"，竖直方向在\"bt1\" 和\"bt3\"正中间的位置；

（3）在窗体\"fEmp\"的\"加载\"事件中设置标签\"bTitle\"以红色文本显示（红色代码255）； （4）单击\"预览\"按钮（名为\"bt1\"），实现打开表“tEmp”的功能；

docmd.opentable “tEmp”

（5）单击\"退出\"按钮（名为\"bt3\"），实现关闭窗体。

20.数据库文件\"samp2.mdb\"里面已经设计了表对象\"tEmp\"、报表对象\"rEmp\"。试按以下功能要求补充设计。 （1）调整报表对象\"rEmp\"，将报表记录数据先按性别升序、再按年龄降序排列； （2）设置报表\"rEmp\"的主体节区内\"性别\"文本框控件显示\"性别\"字段数据；

（3）报表\"rEmp\"页面页脚区域内名为\"tPage\"的文本框控件设置为\"页码/总页数\"形式的页码显示（如1/35、2/35、...）；

（4）在报表页脚节区添加一个计算控件，计算并显示学生平均年龄。计算控件放置在距上边0.2厘米、距左边4.5厘米，并命名为\"tAvg\"；

（5）在报表页面页脚区域内添加一个文本框，显示当前系统日期。