在考生文件夹下,对数据库salary_db完成如下综合应用: 设计一个名称为form2的表单,在表单上设计一个"选项组"(又称选项按钮组,名称为Optiongroup1)及两个命令按钮"生成"(名称为Command1)和"退出"(名称为Command2);

admin2013-11-10  46

问题 在考生文件夹下,对数据库salary_db完成如下综合应用:
设计一个名称为form2的表单,在表单上设计一个"选项组"(又称选项按钮组,名称为Optiongroup1)及两个命令按钮"生成"(名称为Command1)和"退出"(名称为Command2);其中选项按钮组有"雇员工资表"(名称为Option1)、"部门表"(名称为Option2)和"部门工资汇总表"(名称为Option3)三个选项按钮。然后为表单建立数据环境,并向数据环境添加dept表(名称为Cursor1)和salarys表(名称为Cursor2)。
各选项按钮功能如下:
(1)当用户选择"雇员工资表"选项按钮后,再按"生成"命令按钮,查询显示在简单应用中创建的sview视图中的所有信息并把结果存入表gz1.dbf中。
(2)当用户选择"部门表"选项按钮后,再按"生成"命令按钮,查询显示dept表中每个部门的部门号和部门名称并把结果存入表bm1.dbf中。
(3)当用户选择"部门工资汇总表"选项按钮后,再按"生成"命令按钮,则按部门汇总,将该公司的部门号、部门名、工资、补贴、奖励、失业保险和医疗统筹按各部门的支出汇总合计结果存入表hz1.dbf中。请注意:字段名必须与原字段名一致。
(4)按"退出"按钮,退出表单。
注意:以上各项功能必须调试、运行通过。

选项

答案【操作步骤】 步骤1:单击常用工具栏中的"新建"按钮,文件类型选择"表单",打开表单设计器。单击工具栏上"保存"按钮,在弹出"保存"对话框中输入"form2"即可。 步骤2:在"表单控件"中选定"选项按钮组"控件,在"表单设计器-form2.scx"中建立这个选项组,在选项组"属性"的ButtonCount中输入"3"。 步骤3:选中这个选项组并单击鼠标右键,在弹出菜单中选择"编辑"菜单项,再单击"Option1",在其"属性"的Caption处输入"雇员工资表";单击"Option2",在其"属性"的Caption处输入"部门表";单击"Option3",在其"属性"窗口的Caption处输入"部门工资汇总表"。 步骤4:在"表单设计器-form2.scx"中添加两个命令按钮,在第1个命令按钮"属性"的Caption处输入"生成",在第2个命令按钮"属性"的Caption处输入"退出"。 如果数据库salary_db在没有被打开的情况下 步骤5:在"表单设计器-form2.scx"中,单击鼠标右键,在弹出菜单中选择"数据环境"菜单项,在"打开"对话框中选中表"dept"并单击"确定"按钮,接着在"添加表或视图"中再选择表"salarys",再关闭"添加表或视图"对话框。 如果数据库salary_db已经打开 步骤6:在"表单设计器-form2.scx"中,单击鼠标右键,在弹出菜单中选择"数据环境"菜单项,在"添加表或视图"对话框中先选中表"dept"并单击"添加"按钮,接着再选中"salarys"并单击"添加"按钮,最后接着单击"关闭"按钮关闭"添加表或视图"对话框。 步骤7:双击"生成"按钮,在"Command1.Click"编辑窗口中编写相应的程序 open database salary_db do case case thisForm.optiongroup1.value = 1 &&"雇员工资表" select * from sview into table gz1 case thisForm.optiongroup1.value = 2 && "部门表" select * from dept into table bm1 case thisForm.optiongroup1.value = 3 &&"部门工资汇总表" SELECT salarys.部门号,部门名,sum(工资) 工资,sum(补贴) 补贴,sum(奖励) 奖励,sum(失业保险) 失业保险,sum(医疗统筹) 医疗统筹; FROM salarys,dept; WHERE salarys.部门号 = dept.部门号; GROUP BY salarys.部门号 into table hz1 endcase close all 步骤8:双击"退出"命令按钮,在"Command2.Click"编辑窗口中输入"Thisform. Release",接着关闭编辑窗口。

解析 利用表单设计器创建表单,依据题意设置表单各控件,向表单中添加数据环境,添加表单及控件的属性和方法,编写程序语句以完成表单功能。
转载请注明原文地址:https://jikaoti.com/ti/9tT0FFFM
0

最新回复(0)