Access数据库程序设计

考试试题

[问答题]考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tCollect”,同时还设计出以“tCollect”为数据源的窗体对象“fCollect”。 试在此基础上按照以下要求补充窗体设计:(1)将窗体“fCollect”的记录源设置为根据输入的“CDID”,查找“CDID”、“主题名称”、“价格”、“购买日期”、“出版单位ID”和“介绍”等字段的数据。注意:输入提示参数为“请输入CDID:”。(2)在窗体“fCollect”的窗体页眉节区位置添加一个标签控件,其名称为“bTitle”,标题显示为“CD明细”,字体名称为“黑体”,字号为14,字体粗细为“加粗”。(3)打开窗体时,将窗体标题栏上的显示文字设为“CD明细显示”,请按照VBA代码中的指示将代码补充完整。要求:①显示文字中的“CD明细”使用“bTitle”标签控件的内容。      ②将程序代码填写在“*******Add******”与“*******Add******”之间的空行内,只允许补充一行语句。(4)在窗体页脚节区位置添加一个命令按钮,命名为“bC”,按钮标题为“改变颜色”;设置所建命令按钮bC的单击事件,使用户单击该命令按钮后,将标签“CDID_标签”的文字显示颜色改为红色。要求用VBA代码实现。注意:不允许修改窗体对象“fCollect”中未涉及的控件和属性;不允许修改表对象“tCollect”。
[问答题]考生文件夹下存在一个数据库文件"samp3.mdb",里面已经设计好表对象"tStud",同时还设计出窗体对象"fStud"。请在此基础上按照以下要求补充"fStud"窗体的设计:  (1)在窗体的"窗体页眉"中距左边0.4厘米、距上边1.2厘米处添加一个直线控件,控件宽度为10.5厘米,控件命为"tLine";将窗体中标签件"lTalbel"上的文字改为"隶书",字号改为18。  (2)打开窗体时,窗体标题自动显示为标签控件"lTalbel"的内容,并且自动将该控件上的文字颜色改为"蓝色",请按照VBA代码中的指示将代码补充完整。  (3)将窗体边框改为"细边框"样式,取消窗体中的水平和垂直滚动条、记录选择器、导航按钮和分隔线;并且只保留窗体的关闭按钮。  (4)假设"tStud"表中"学号"字段的第5位和第6位编码代表该生的专业信息,当这两位编码为"10"时表示"信息"专业,为其他值时表示"管理"专业。设置窗体中名称为"tSub"文本框控件的相应属性,使其根据"学号"字段的第5位和第6位编码显示对应的专业名称。 (5)在窗体中有一个"退出"命令按钮,名称为"CmdQuit",其功能为关闭"fStud"窗体。请按照VBA代码中的指示将实现此功能的代码补充完整。    注意:不允许修改窗体对象"fStud"中未涉及的控件、属性和任何VBA代码;不允许修改表对象"tStud";程序代码只允许在"*****Add*****"与"*****Add*****"之间的空行内补充一行语句完成设计,不允许增删和修改其它位置已存在的语句。
[问答题]考生文件夹下存在一个数据库文件"samp3.mdb",里面已经设计好表对象"tStud"、查询对象"qStud"和"fTimer"窗体对象,同时还设计出以"qStud"为数据源的报表对象"rStud"。试在此基础上按照以下要求补充报表和窗体设计:(1)在报表的报表页眉节区添加一个标签控件,其名称为"bTitle",显示内容为"学生信息表";预览报表时,报表标题显示内容为"****年度#####",请按照VBA代码中的指示将代码补充完整。说明:①显示标题中,"****"为本年度年份,要求使用函数获取。     ②显示标题中,"#####"为标签控件"bTitle"中的内容。     要求:标题显示内容中间和前后不允许出现空格。(2)在报表的主体节区添加一个文本框控件,显示"姓名"字段值。该控件放置在距上边0.1厘米、距左边3.2厘米,并命名为"tName"。 (3)按"编号"字段前四位分组统计每组记录的平均年龄,并将统计结果显示 在组页脚节区。计算控件命名为"tAvg"。  要求:使用分组表达式进行分组。(4)有一个名为"fTimer"的计时器窗体。运行窗体后,窗体标题自动显示为"计时器";单击"设置"按钮(名称为"cmdSet"),在弹出的输入框 中输入计时秒数(10以内的数);单击"开始"按钮(名称为"cmdStar") 开始计时,同时在文本框(名称为"txtList")中显示计时的秒数。计时 时间到时,停止计时并响铃,同时将文本框清零。根据以上描述,按照VBA 代码中的指示将代码补充完整。 注意:不允许改动数据库中的表对象"tStud"和查询对象"qStud",同 时也不允许修改报表对象"rStud"和窗体对象"fTimer"中已有的 以及未涉及的控件和属性。程序代码只允许在"*******Add******"与 "*******Add******"之间的空行内补充一行语句、完成设计,不允许增删和修改其它位置已存在的语句。
[问答题]考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tNorm”和“tStock”,查询对象“qStock”和宏对象“m1”,同时还设计出以“tNorm”和“tStock”为数据源的窗体对象“fStock”和“fNorm”。具体要求如下:(1)在“fStock”窗体对象的窗体页眉节区位置添加一个标签控件,其名称为“bTitle”,初始化标题显示为“库存浏览”,字体名称为“黑体”,字号为18,字体粗细为“加粗”。(2)在“fStock”窗体对象的窗体页脚节区位置添加一个命令按钮,命名为“bList”,按钮标题为“显示信息”。(3)设置所建命令按钮bList的单击事件属性为运行宏对象m1。(4)设置相关属性,取消在子窗体中添加新记录的功能;将“fStock”窗体对象中的“fNorm”子窗体的导航按钮去掉。(5)创建窗体对象fStock的加载事件,实现设置窗体标题为“****####”。其中,****为系统日期四位当前年,用函数获取;####则要引用“bTitle”标签的标题内容。要求用VBA代码实现。(6)创建窗体对象fStock的合适事件,实现窗体上“btime”标签显示动态数字时钟,要求输出格式为“12:05:08”。其中,时间用函数获取,要求用VBA代码实现。注意:不允许修改窗体对象中未涉及的控件和属性;不允许修改表对象“tNorm”、“tStock”和宏对象“m1”。
[问答题]考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tStud”、窗体对象“fSys”和报表对象“rStud”。请在此基础上按照以下要求补充“fSys”窗体和“rStud”报表的设计:(1)在“rStud”报表的报表页眉节区位置添加一个标签控件,其名称为“rTitle”,其显示文本为“非团员基本信息表”;将报表标题栏上的显示文本设置为“非团员信息”;将名称为“tSex”的文本框控件的输出内容设置为“性别”字段值。在报表页脚节区添加一个计算控件,其名称为“tCount”,显示报表学生人数。(2)将“fSys”窗体的边框样式设置为“细边框”,取消窗体中的水平和垂直滚动条、导航按钮、记录选择器、分隔线、最大化按钮和最小化按钮。(3)将“fSys”窗体中“用户名称”(名称为“lUser”)和“用户口令”(名称为“lPass”)两个标签上的文字颜色改为红色(红色代码为#FF0000)、字体粗细改为“加粗”。(4)将“fSys”窗体中名称为“tPass”的文本框控件的内容以密码形式显示;将名称为“cmdEnter”的命令按钮从灰色状态设为可用;将控件的Tab移动次序设置为:“tUser”→“tPass” →“cmdEnter” →“cmdQuit”。(5)试根据以下窗体功能和报表输出要求,补充已给事件代码,并运行调试。在窗体中有“用户名称”和“用户密码”两个文本框,名称分别为“tUser”和“tPass”,还有“确定”和“退出”两个命令按钮,名称分别为“cmdEnter”和“cmdQuit”。 窗体加载时,重置“bTitle”标签的标题为“非团员人数为XX”,这里XX为从表查询计算得到;在输入用户名称和用户密码后,单击“确定”按钮,程序将判断输入的值是否正确,如果输入的用户名称为“csy”,用户密码为“1129”,则显示提示框,提示框标题为“欢迎”,显示内容为“密码输入正确,打开报表!”,单击“确定”按钮关闭提示框后,打开“rStud”报表,代码设置其数据源输出非团员学生信息;如果输入不正确,则提示框显示“密码错误!”,同时清除“tUser”和“tPass”两个文本框中的内容,并将光标移至“tUser”文本框中。当单击窗体上的“退出”按钮后,关闭当前窗体。以上涉及计数操作统一要求用“*”进行。注意:不允许修改报表对象“rStud”中已有的控件和属性;不允许修改表对象“tStud”。不允许修改窗体对象“fSys”中未涉及的控件、属性和任何VBA代码;只允许在“*****Add*****”与“*****Add*****”之间的空行内补充一条代码语句、不允许增删和修改其它位置已存在的语句。
[问答题]考生文件夹下存在一个数据库文件"samp3.mdb"。"samp3.mdb"数据库里面已经设计了表对象"tEmp"和"tGroup"、窗体对象"fEmp"、报表对象"rEmp"和宏对象"mEmp"。试在此基础上按照以下要求补充设计:(1)设置报表"rEmp"的相关属性,使其显示年龄小于30岁(不含30)、职务为"职员"的女职工记录。设置报表主体节区内"tName"文本框控件的显示内容为"姓名"字段值。(2)将报表"rEmp"主体节区内文本框"tDept"的控件来源属性设置为计算控件。要求该控件可以根据报表数据源中的"所属部门"字段值,从非数据源表对象"tGroup"中检索出对应的部门名称并显示输出。在适当位置增加一个计算控件(命名为tAvg),计算并显示每个部门的平均年龄。说明:适当位置是指组页脚、页面页脚或报表页脚。   提示:考虑使用Dlookup函数。   (3)设置窗体"fEmp"的窗体标题为"职员基本情况查询";将宏"mEmp"重命名为自动执行的宏。(4)在"fEmp"窗体的窗体页眉节上有一个文本框(名为"txtName")和一个命令按钮(名为"cmdQuery")。在文本框中输入职员姓名后,单击"cmdQuery"命令按钮,调用事件代码将依据输入的姓名在"tEmp"表中进行查找,并将找到的信息添加到主体节相应文本框中,如果没有找到将显示提示信息"对不起,没有这个职员!";如果在"txtName"文本框中未输入姓名,单击"cmdQuery"命令按钮后,将显示提示信息"对不起,未输入职员姓名,请输入!"。根据上述功能描述,按照VBA代码指示,将代码补充完整。  注意:不允许修改数据库中的表对象"tEmp"和"tGroup";不允许修改宏对象"mEmp"里的内容;不允许修改窗体对象"fEmp"和报表对象"rEmp"中未涉及的控件和属性。已给事件过程,只允许在"*****Add*****"与"*****Add*****"之间的空行内补充一条语句、完成设计,不允许增删和修改其它位置已存在的语句。