答案:(1)【操作步骤】
创建程序文件,在程序文件中输入以下语句。 OPEN DATABASE salary_db CREATE VIEW sview AS;
SELECT 部门号,雇员号,姓名,工资,补贴,奖励,失业保险,医疗统筹,工资+补贴+奖励-失业保险-医疗统筹 AS 实发工资; FROM salarys; ORDER BY 部门号 DESC
保存程序文件名为T1.PRG,并运行。
2.设计一个名称为form1的表单,表单以表格方式(与BROWSE窗口方式相似,表格名称为grdSalarys)显示salary_db数据库中salarys表的记录,供用户浏览。在该表单的右下方有一个命令按钮,名称为Command1,标题为\退出浏览\,当单击该按钮时退出表单。
答案: 步骤3:在\数据环境设计器-form1.scx\中选定表\并按住鼠标不放,拖至\表单设计器\窗口中,释放鼠标,即可生成表格名称为grdSalarys的表格。 综合应用:
(1) 当用户选择\雇员工资表\选项按钮后,再按\生成\命令按钮, 查询显示在简单应用中创建的sview视图中的所有信息并把结果存入表gz1.dbf中。
(2) 当用户选择\部门表\选项按钮后,再按\生成\命令按钮,查询显示dept表中每个部门的部门号和部门名称并把结果存入表bm1.dbf中。 (3) 当用户选择\部门工资汇总表\选项按钮后,再按\生成\命令按钮,则按部门汇总, 将该公司的部门号、部门名、工资、补贴、奖励、失业保险和医疗统筹的支出汇总合计结果存入表hz1.dbf中。请注意:字段名必须与原字段名一致。
步骤5:在\表单设计器-form2.scx\中,单击鼠标右键,在弹出菜单中选择\数据环境\菜单项,在\打开\对话框中选中表\并单击\确定\按钮,接着在\添加表或视图\中再选择表\,再关闭\添加表或视图\对话框。 步骤7:双击\生成\按钮,在\编辑窗口中编写相应的程序 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
第八十套———基本操作
在考生文件夹下的\商品销售\数据库中完成如下操作:
1. 将\销售表\中的日期在2000年12月31日前(含2000年12月31日)的记录复制到一个新表\销售表2001.dbf\中。 2.将\销售表\中的日期(日期型字段)在2000年12月31日前(含2000年12月31日)的记录物理删除。
3.打开\商品表\,使用BROWSE命令浏览时,使用\文件\菜单中的选项将\商品表\中的记录生成文件名为\商品表.htm\的HTML格式文件。 4.为\商品表\创建一个主索引,索引名和索引表达式均是\商品号\;为\销售表\创建一个普通索引(升序),索引名和索引表达式均是\商品号 (1)SELECT * FROM 销售表 WHERE 日期<={^2000-12-31} INTO table 销售表2001 (2)DELETE from 销售表 WHERE 日期<={^2000-12-31}
pack 简单应用:
1. 在\商品销售\数据库中,根据\销售表\和\商品表\查询每种商品的商品号、商品名、单价、销售数量和销售金额(商品号、商品名取自商品表,单价和销售数量取自销售表,销售金额=单价*销售数量),结果按销售金额降序排序,并将查询结果存储到see_a表中。
答案:SELECT 商品表.商品号,商品表.商品名,销售表.单价,销售表.销售数量,(销售表.单价*销售表.销售数量) AS 销售金额; FROM 商品表,销售表;
WHERE 商品表.商品号 = 销售表.商品号 ; ORDER BY 销售金额 DESC; INTO TABLE see_a
(2)步骤2:双击\刷新标题\命令按钮,在\编辑窗口中把语句修改为:ThisForm.Caption = \商品销售数据输入\,关闭编辑窗口。
步骤3:双击\商品销售输入\命令按钮,在\编辑窗口中把语句修改为:DO FORM sellcomm,关闭编辑窗口。
步骤4:双击\输出销售报表\命令按钮,在\编辑窗口中把语句修改为:REPORT FORM print1 PREVIEW 综合应用:在考生文件夹下,对\商品销售\数据库完成如下综合应用: 1.请编写名称为change_c的命令程序并执行,该程序实现下面的功能: 将\商品表\进行备份,备份文件名为\商品表备份.dbf\;
将\商品表\中\商品号\前两位编号为\的商品的\单价\修改为出厂单价的10%; 使用\单价调整表\对商品表的部分商品出厂单价进行修改(按\商品号\相同)。
2.设计一个名称为form2的表单,上面有\调整\名称Command1)和\退出\名称Command2)两个命令按钮。 单击\调整\命令按钮时,调用change_c命令程序实现商品单价调整; 单击\退出\命令按钮时,关闭表单。
select * from 商品表 into table 商品表备份
update 商品表 set 单价=出厂单价*0.1 where left(商品号,2)=\
update 商品表 set 出厂单价=单价调整表.出厂单价 where 商品号=单价调整表.商品号
程序做好后保存,先不运行,然后新建一个表单,在表单上添加两个命令按钮,”调整”和”退出”,在”调整”的click事件中写:do change_c, 第八十一套——基本操作
在考生文件夹下的\雇员管理\数据库中完成如下操作:
3. 在\雇员\表中,将所有记录的EMAIL字段值使用\部门号\的字段值加上\雇员号\的字段值再加上\进行替换。 Update email set email=部门号+雇员号+\
(3) 修改命令按钮\刷新日期\的click事件下的语句,使用SQL的更新命令,将\雇员\表中\日期\字段值更换成当前计算机的日期值。注意:只能在原语句上进行修改,不可以增加语句行。
步骤4:双击\刷新日期\命令按钮,在\编辑窗口中把语句修改为:UPDATE 雇员 SET 日期 = DATE(),关闭编辑窗口。 综合应用:
2.设计一个名称为form2的表单,表单上设计一个页框,页框(PageFrame1)有\部门\和\雇员\两个选项卡,在表单的右下角有一个\退出\命令按钮。要求如下:
(2) 单击选项卡\雇员\时,在选项卡\雇员\中使用\表格\方式显示VIEW1视图中的记录(表格名称为grdView1); (3) 单击选项卡\部门\时,在选项卡\部门\中使用\表格\方式显示\部门\表中的记录(表格名称为\部门\; 答案:
步骤5:在\表单设计器\中,单击鼠标右键,在弹出菜单中选择\数据环境\菜单项,在\添加表或视图\对话框中先选中表\部门\并单击\添加\按钮,接着再单击\选定\框中\视图\的按钮,并单击\添加\按钮,最后接着单击\关闭\按钮关闭\添加表或视图\对话框。
步骤6:在\表单控件\对话框中选定\页框\控件,在\表单设计器\中建立这个\页框\,选中这个\页框\并单击鼠标右键,在弹出菜单中选择\编辑\菜单项,再单击\,在其\属性\的Caption处输入:部门,接着在\数据环境\中选中\部门\表按住不放,再移动鼠标到\页框\的\部门\处,最后松开鼠标;单击\,在其\属性\的Caption处输入:雇员,接着在\数据环境\中选中\视图按住不放,再移动鼠标到\页框\的\雇员\处,最后松开鼠标。 第八十二套————基本操作
简单应用:
1. 用SQL语句完成下列操作: 将选课在5门课程以上(包括5门)的学生的学号、姓名、平均分和选课门数按平均分降序排序,并将结果存放于数据库表stu_temp(字段名为学号、姓名、平均分和选课门数)。 答案:(1)【操作步骤】
在命令窗口输入以下语句:
SELECT 学生.学号,姓名,AVG(成绩) AS 平均分, COUNT(*) AS 选课门数; FROM 学生,选课;
WHERE 学生.学号=选课.学号;
GROUP BY 选课.学号 HAVING COUNT(*)>=5; ORDER BY 平均分 DESC; INTO TABLE stu_temp
综合应用:
运行表单时,首先在选项组控件中选择\升序\或\降序\(使用IF语句判断), 单击\计算\命令按钮后,按照成绩\升序\或\降序\根据选项组控件)将选修了\语言\的学生学号和成绩分别存入stu_sort1.dbf和stu_sort2.dbf文件中。单击\退出\按钮关闭表单。 答案:【操作步骤】
步骤5:双击\计算\命令按钮,在Command1的Click事件中输入命令: if thisform. myOption.value=1
SELECT 学号,成绩 FROM 选课,课程 WHERE 选课.课程号=课程.课程号 AND 课程名称=\语言\成绩 INTO dbf stu_sort1 else
SELECT 学号,成绩 FROM 选课,课程 WHERE 选课.课程号=课程.课程号 AND 课程名称=\语言\成绩 DESC INTO dbf stu_sort2 endif
步骤6:双击\退出\命令按钮,在Command2的Click事件中输入:Thisform. Release,接着关闭编辑窗口,最后保存并运行表单