1、文本框中输入具体项目值后,单击命令按钮,如果两个控件中均有值,则在子窗体中显示找出的相应记录,如果两个控件中不全有值,显示消息框,消息框标题为注意,提示文字为查询项目和查询内容不能为空!,消息框中只有一个确定按钮;单击命令按钮,在子窗体中显示tStud表中的全部记录;命令按钮,将cItem两个控件中的值清空。解析:打开窗体对象的设计视图,并在“窗体设计工具”的“设计”选项卡的“工具”组点击属性表按钮,打开窗体属性对话框,将标题改为,依次设置所要求的边框样式、窗体中的水平和垂直滚动条、记录选择器、导航按钮和分隔线,完成后保存窗体。打开子窗体对象按钮,打开窗体属性对话框,按照要求设置窗体的属性,完
2、成后保存子窗体。选择标签控件,设置其前景色为白色,背景色为#000080,用同样的方法设置标签控件,完成后保存窗体。打开窗体对象Tab键次序,打开Tab键次序对话框,按照题目要求设置次序,完成后保存窗体。打开窗体设计视图,找到组合框,右键选择事件生成器,在弹出的对话框中选择代码生成器,点按钮打开代码设计对话框第1处填写 Ldetail.Caption = cItem & 内容:第2处填写 fDetail.Form.RecordSource = 第3处填写 MsgBox , vbOKOnly, 保存所有设置。Access2.accdb中,已经设计了表对象tEmp、窗体对象fEmp、报表对象rEm
3、p 和宏对象mEmp按要求补充设计:设置报表按照性别字段分组降序排列输出,同时在其对应组页眉区添加一个文本框,命名为SS,内容输出为性别值;将报表页面页脚区域内名为tPage的文本框控件设置为页码/总页数形式的页码显示(如1/15、2/15、)。将窗体对象上的命令按钮(名为btnQ)从灰色状态设为可用,然后设置控件的Tab键焦点移动顺序为:控件 tData-btnP-btnQ 。在窗体加载事件中实现代码重置窗体标题为标签bTitle的标题内容。窗体上单击输出命令按钮(名为btnP),实现以下功能:计算10000以内的素数个数及最大素数两个值,将其显示在窗体上名为tData的文本框内并输出到外部
4、文件保存。打开表),代码调用宏对象以打开数据表根据上述功能要求,对已给的命令按钮事件过程进行代码补充。打开报表对象的设计视图,在报表设计工具的设计选项卡的分组和汇总组中单击分组和排序,在打开的分组、排序和汇总区域中,单击添加组,选择字段,降序有页眉节,分组形式选择按整个值在“报表设计工具”的“设计”选项卡的“控件”组中选择一个文本框,放到性别页眉中,选择工具栏上的属性按钮,在弹出的属性框中设置名称为SS,并在控件来源属性中输入:=性别。选中文本框控件,并在“报表设计工具”的“设计”选项卡的“工具”组点击按钮,在=Page &/ & Pages,保存报表。打开窗体对象的设计视图,选中命令按钮,并
5、在“窗体设计工具”的“设计”选项卡的“工具”组点击按钮,设置可用属性为是,并在“工具”组点击按钮,将Tab键索引属性设置为 0;,将属性设置为 1,保存窗体。选中窗体,并在“窗体设计工具”的“设计”选项卡的“工具”组点击按钮,单击加载属性右边的打开代码生成器。设置窗体标题为标签的标题内容的语句为:Caption = bTitle.Caption 计算10000以内的素数个数及最大素数两个值的语句为: For i = 1 To 10000 If sushu(i) Then n = n + 1 If i mn Then mn = i End If Next i调用宏对象的语句为: DoCmd.Ru
6、nMacro 最后保存并运行该窗体。【3】数据库文件Access3.accdb年龄字段升序排列输出;设置窗体对象背景图像为photo.bmp计算满足表达式1+2+3+n=30000的最大n值,将n的值显示在窗体上名为试根据上述功能要求,对已给的命令按钮事件过程进行代码补充。添加排序排序次序选择升序 =Page & Pages 保存报表。的设计视图,选择窗体控件,并在“窗体设计工具”的“设计”选项卡的“工具”组点击按钮,图片属性设置为单击的标题内容: Caption = 信息输出计算1+2+3+n=30000的最大n值的语句为: sum = 0 n = 0 Do While sum btnP -
7、btnQ。在窗体加载事件中,实现重置窗体标题为标签在男性最大年龄),实现以下功能。查找表对象中男性员工的最大年龄,将其输出显示在控件tData内;统计年龄在30以下(不含30)男性员工的人数,将其值写入外部文件out.dat中。打开员工报表),通过代码调用宏对象以打开报表根据上述要求,对已给的命令按钮事件过程进行补充和完善。在,选择字段中点击表达式,输入=year(聘用时间)10,有页眉节在“报表设计工具”的“设计”选项卡的“控件”组中选择一个文本框,放到组页眉中,并在“工具”组点击按钮,在弹出的属性框中设置名称为SS,并在控件来源属性中输入:=(year(聘用时间)10)*10 &年代 保存
8、报表。命令按钮,单击工具栏上的可见性,单点击工具栏上的属性设置为0;属性设置为1,保存窗体。打开窗体的设计视图,右键选择按钮打开代码设计对话框。Caption = bTitle.Caption 打开窗体按钮打开代码设计框Add2输入语句: MAgeMax = rs.Fields()Add3 rs.MoveNextAdd4【5】数据库文件Access5.accdb和宏对象按照要求补充设计:设置表对象中字段的有效性规则为:年龄值在20到50之间(不含20和50),有效性文本设置为请输入有效年龄设置报表字段降序(先女后男)排列输出;形式页码显示;将窗体上名为的命令按钮由灰色无效状态改为有效状态。设置
9、窗体标题为职工信息输出试根据以下窗体功能要求,对已给的命令按钮事件过程进行补充和完善。),弹出一输入对话框,其提示文本为请输入大于0的整数值 输入 1 时,相关代码关闭窗体(或程序); 输入 2 时,相关代码实现预览输出报表对象输入 =3 时,相关代码调用宏对象 以打开数据表选中表对象,右击鼠标,选择设计视图,选中字段,再选中下面的有效性规则,点击右边的.按钮,弹出表达式生成器,在文本框中输入20 And ,点击设计(D)按钮,选中=#1/1/1991#,也可以直接在右边的框中输入选中页面页脚区的文本框控件,在文本框中输入 =- Page & Pages &标签,右击鼠标选择属性,设置其上边距
10、1厘米,选中窗体,右击鼠标选择属性,设置其=3的条件可以表示为Case Is=3,预览输出报表对象的语句为 DoCmd.OpenReport 【8】数据库文件Access8.accdb的报表页眉区域内名为标签控件的标题显示为职工基本信息表,同时将其安排在距上边0.5厘米、距左侧5厘米的位置。的主体节区内tSex文本框控件显示字段数据。将窗体按钮的单击事件属性设置为宏,以完成按钮单击打开报表的操作。窗体加载时将考生文件夹下的图片文件test.bmp设置为窗体的背景。窗体事件代码已提供,请补充完整。要求背景图像文件当前路径必须用CurrentProject.Path获得。打开报表rEmp的设计视图,选中标签,并在“报表设计工具”的“设计”选项卡的“工具”组点击按钮,设置标签的标题、上边距和左边距属性。选中标签下面的文本框,并在“工具”组点击按钮,设置文本框的字段。打开窗体fEmp的设计视图,选中命令按钮,设置单击属性为选中窗体fEmp,并在“工具”组点击按钮,点击事件右边的打开代码生成器,输入:Picture=CurrentProject.Path+test.bmp
copyright@ 2008-2022 冰豆网网站版权所有
经营许可证编号:鄂ICP备2022015515号-1