首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下存在一个数据库文件"samp3.mdb",里面已经设计好表对象"tStud"、查询对象"qStud"、窗体对象"fStud"和子窗体对象"fDetail",同时还设计出以"qStud"数据源的报表对象"rStud"。请在此基础上按照以下要求补充
考生文件夹下存在一个数据库文件"samp3.mdb",里面已经设计好表对象"tStud"、查询对象"qStud"、窗体对象"fStud"和子窗体对象"fDetail",同时还设计出以"qStud"数据源的报表对象"rStud"。请在此基础上按照以下要求补充
admin
2013-11-29
17
问题
考生文件夹下存在一个数据库文件"samp3.mdb",里面已经设计好表对象"tStud"、查询对象"qStud"、窗体对象"fStud"和子窗体对象"fDetail",同时还设计出以"qStud"数据源的报表对象"rStud"。请在此基础上按照以下要求补充"fStud"窗体和"rStud"报表的设计:
(1)在报表的报表页眉节区位置添加一个标签控件,其名称为"bTitle",标题显示为"团员基本信息表";将名称为"tSex"的文本框控件的输出内容设置为"性别"字段值。在报表页脚节区添加一个计算控件,其名称为"tAvg",设置相关属性,输出学生的平均年龄。
(2)将"fStud"窗体对象主体节中控件的Tab键焦点移动顺序设置为:"CItem"->"TxtDetail"->"CmdRefer"->"CmdList"->"CmdClear"->"fDetail"->"简单查询"。
(3)在窗体加载事件中,实现重置窗体标题为标签"tTitle"的标题内容。
(4)试根据以下窗体功能要求,对已给的事件过程进行代码补充,并运行调试。
在窗体中有一个组合框控件和一个文本框控件,名称分别为"CItem"和"TxtDetail";有两个标签控件,名称分别为"Label3"和"Ldetail";还有三个命令按钮,名称分别为"CmdList"、"CmdRefer"和"CmdClear"。在"CItem"组合框中选择某一项目后,"Ldetail"标签控件将显示出所选项目名加上"内容:"。在"TxtDetail"文本框中输入具体项目值后,单击"CmdRefer"命令按钮,如果"CItem"和"TxtDetail"两个控件中均有值,则在子窗体中显示找出的相应记录,如果两个控件中没有值,显示提示框,提示框标题为"注意",提示文字为"查询项目或查询内容不能为空!!!",提示框中只有一个"确定"按钮;单击"CmdList"命令按钮,在子窗体中显示"tStud"表中的全部记录;单击"CmdClear"命令按钮,将清空控件"cItem"和"TxtDetail"中的值。
注意:不允许修改窗体对象"fStud"和子窗体对象"fDetail"中未涉及的控件、属性和任何VBA代码;不允许修改报表对象"rStud"中已有的控件和属性;不允许修改表对象"tStud"和查询对象"qStud"。只允许在"*****Add*****"和"*****Add*****"之间的空行内补充一条代码语句、完成设计,不允许增删和修改其他位置已存在的语句。
选项
答案
(1)【操作步骤】 步骤1:单击"报表"对象,选择"rStud"报表,单击"设计"按钮,打开"设计视图"。 步骤2:选中工具箱中"标签"控件 ,单击报表页眉节区任一点,出现标签控件,输入"团员基本信息表"。右键单击此标签控件,选择"属性",弹出属性对话框。选择"全部"选项卡,在"名称"行输入"bTitle",然后关闭属性对话框。 步骤3:右键单击"tSex"文本框控件选择"属性",弹出属性对话框。选择"全部"选项卡,在"控件来源"行右侧下拉列表中选择"性别",然后关闭属性对话框。 步骤4:选择工具箱中"文本框"控件,单击报表页脚节区任一点,弹出"Text"和"未绑定"两个文本框。右键单击"Text"文本框,选择"属性",弹出属性对话框。选择"全部"选项卡,在"标题"行输入"平均年龄:",然后关闭对话框。 步骤5:右键单击"未绑定"文本框选择"属性",弹出属性对话框。选择"全部"选项卡,在"名称"行输入"tAvg",在"控件来源"行输入"=Avg([年龄])",然后关闭属性对话框。 步骤6:单击工具栏中的"保存"按钮,之后关闭设计视图。 (2)【操作步骤】 步骤1:单击"窗体"对象,选择"fStud"窗体,单击"设计"按钮,打开"设计视图"。 步骤2:在窗体的任意位置右击,在弹出的快捷菜单中选择"Tab键次序"命令,打开"Tab键次序"对话框,在"自定义顺序"列表中通过拖动各行来调整Tab键的次序,第一行为"CItem",第二行为"TxtDetail",第三行为"CmdRefer",第四行为"CmdList",第五行为"CmdClear",第六行为"fDetail",第七行为"简单查询"。单击"确定"按钮,关闭"Tab键次序"对话框。 步骤3:单击工具栏中的"保存"按钮。 (3)【操作步骤】 步骤1:右键单击窗体设计左上角的"窗体选择器",在弹出的菜单中选择"属性"。 步骤2:单击"事件"选项卡中"加载"属性右边的"…"打开代码生成器。设置窗体标题为标签"tTitle"的标题内容的代码语句,在Add4空行内输入:Caption = tTitle.Caption。 步骤3:单击工具栏中"保存"按钮,关闭代码生成器。 (4)【操作步骤】 步骤1:在设计视图中的任意位置右击,在弹出的快捷菜单中选择"事件生成器"命令,在弹出的对话框中选择"代码生成器"选项,单击"确定"按钮. 步骤2:在Add1空行输入代码: ’************************* Add1 ************************ Dim aa aa = cItem.Value Ldetail.Caption = aa + "内容:" ’************************* Add1 ************************ 步骤3:Add2空行输入代码: ’************************* Add2 ************************ fDetail.Form.RecordSource = "tStud" ’************************* Add2 ************************ 步骤4:Add3空行输入代码: ’************************* Add3 ************************* MsgBox "查询项目或查询内容不能为空", vbOKOnly, "注意" ’************************* Add3 ************************* 步骤5:单击工具栏中"保存"按钮,关闭代码生成器。
解析
转载请注明原文地址:https://jikaoti.com/ti/f2V0FFFM
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
在Access中,“文本”数据类型的字段最大可以输入______个字节。
查询是数据浏览、数据重组、【】、【】、输入输出等操作的基础。
在数据访问页的工具箱中,图标的名称是
要设置只在报表最后一页主体之后输出的信息,需要设置()。
下列不属于Access提供的窗体类型是______。
要在报表上显示格式为“4/总15页”的页码,则计算控件的控件来源应设置为______。
在表达式生成器的四个区域中,最上面的是()区域。
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Dimarrayl(10,10)AsIntegerDimi,jASIn
定义了二维数组B(2to6,4),则该数组的元素个数为______。
在查询设计视图中______.
随机试题
距骨下关节面呈切线位显示的摄影体位是
母犬,脐部出现局限性肿胀近6个月,触诊该肿胀柔软,饱食和挣扎时肿胀增大,压迫肿胀可缩小,皮肤无红、热、痛等炎性反应。该病最可能的诊断是()。
上颌第一磨牙较长的髓角是
用加总的方法进行扩大时距的数据合并,适用于时点性总量指标。( )
以下关于封闭式基金的说法,不正确的是()。
银行集中监管体制是指政府通过()银行监管当局来行使监管职能的方式。
“人而无信,不知其可也。”诚实守信是公民道德的基石,是对每个人最起码的道德要求,同时也是一种经济道德、社会公德。“诚招天下客,誉从信中来”,诚信是市场经济的本质属性.是企业宝贵的无形资产。诚信也是社会和谐的纽带,如果不能在公民中普遍地培育起诚信意识,人与人
Therigidhigher-educationbusinessisabouttoexperienceawelcomeearthquake.Traditionaluniversitiesnowfaceanew【C1】____
______resultsin"Acidrain"?______couldcontributetoglobalwarming?
Manypeoplecatchacoldinthespringtimeorfall.Itmakesus【T1】______:ifscientistscansendamantothemoon,whycan’tt
最新回复
(
0
)