VFP解题捷径.ppt

单击此处编辑母版标题样式,单击此处编辑母版文本样式,第二级,第三级,第四级,第五级,*,第3套一 3.,一、基本操作题,3.用,SQL命令,向SCORE1表插入一条记录：学号为993503433、课程号为0001、成绩是99。,【捷径】,（用“数据工作期”）打开表，点“浏览”,选菜单“显示”/“追加方式”,直接输入记录,SQL命令,保存在哪？,第4套三、,【捷径】,(1)用查询设计器,select *from BOOKS into table BOOKSBAK,(2)（用“数据工作期”）打开BOOKSBAK表，点“浏览”。把书名不含“计算机”的记录加删除记号。点菜单“表”/“彻底删除”,(3)选菜单“表”/“替换字段”(降价5%),(3)用查询设计器得到新表newtable，直接修改,(1)首先将BOOKS.DBF中所有书名中,含有计算机3个字,的图书复制到表BOOKSBAK中，以下操作均在BOOKSBAK表中完成；,复制后的图书价格在原价格基础上降价5%；,从图书均价高于25元（含25）的出版社中，查询并显示图书均价最低的出版社名称以及均价，查询结果保存在表newtable中（字段名为出版单位和均价）。,第8套二、1,【捷径】,用嵌套，较难。直接找出s1项目所用零件号p1、p2作为条件用查询设计器做。满分,WHERE 使用零件.零件号=p1 OR 使用零件.零件号=p2“,select 项目信息.项目号,项目信息.项目名,零件信息.零件号,零件信息.零件名称;,from 零件信息 inner join 使用零件 inner join 项目信息；,on 使用零件.项目号=项目信息.项目号；,on 零件信息.零件号=使用零件.零件号；,where 使用零件.零件号 in(select 零件号 from 使用零件 where 项目号=s1)；,into table item_temp；,order by 使用零件.项目号 desc,第8套二、1,表,零件,号,零件,名称,单价,p1,PN1,1200,p2,PN2,1300,p3,PN3,1400,p4,PN4,1100,p5,PN5,1800,p6,PN6,280,项目号,零件号,数量,s1,p1,100,s1,p2,200,s2,p1,300,s2,p3,400,s3,p2,28,s3,p3,350,s4,p4,154,s4,p5,200,s5,p6,600,s5,p3,120,s6,p2,430,s6,p4,270,项目,号,项目名,项目,负责人,电,话,s1,国贸大厦,王一茗,s2,长城饭店,张枫舞,s3,昆仑饭店,林加仪,s4,京城大厦,李明器,s5,渔阳饭店,赵美丽,s6,五洲酒店,姜加良,项目信息,使用零件,零件信息,第14套,【捷径】,对照,score1,和,course,中的课程号，手工删除两个表有相同课程号的记录,用查询设计器：,SELECT,课程名,开课单位,FROM course,；,ORDER BY,课程名,INTO TABLE new_table2,忽略最难步骤,二、2.在SCORE_MANAGER数据库中查询,没有学生选修的课程,，查询结果含课程名和开课单位字段，结果按课程名升序保存在一个新表,NEW_TABLE2,中（注意：字段名开课单位是在基本操作中根据开课系部修改后的字段名）。,避繁就简,学号,课程号,成绩,993503438,0001,92,993503438,0002,86,993503437,0001,87,993503438,0005,80,993503433,0009,74,993503433,0010,66,993501122,0004,56,993501122,0007,85,993502235,0006,77,993502235,0001,63,993503412,0009,95,993506112,0010,84,993504228,0005,57,993504228,0002,88,993511236,0005,74,993511236,0007,64,993503234,0004,87,993501122,0001,45,993502235,0009,50,993502235,0005,993501122,0009,课程号,课程名,开课,单位,学时数,学分,开课学期,0001,基础会计,会计系,36,2,1,0004,唐诗鉴赏,中文系,18,1,1,0002,管理学,经管系,54,3,1,0003,法学原理,法律系,36,2,1,0006,信息管理,信息系,72,4,2,0005,财务管理,财政系,54,3,1,0007,美学基础,中文系,36,2,1,0008,体育,体育组,36,2,4,0009,审计学,会计系,72,4,2,0010,科技概论,政教组,36,2,1,0011,数据库原理,信息系,54,3,3,0012,运筹学,信息系,54,3,3,score1,course,第14套表,73三 表文件（,不运行,）,第73套三、单击列表框中的数据项时，统计选修了所选课程的学生人数（从考试成绩表），并将结果存储在以课程名命名的表中，表中只有一个字段人数；,【答案】列表框List1的属性设置如下：,对象 属性属性值,List1 ROWSOURCE 课程.课程名List1ROWSOURCETYPE6-字段,设置 list1列表框的Click事件代码：,select count(,dist,学号)as 人数 from 课程 join 考试成绩;,on 课程.课程编号=考试成绩.课程编号 where;,课程名=,thisform.list1.list(thisform.list1.listindex),;,into tabl,thisform.list1.list(thisform.list1.listindex),【捷径】题目没给具体课程名，不需要得到表，可以任取一个课程名作为条件，用查询设计器,1三 表文件(,要运行,),第1套三,运行表单时，在文本框中输入工程号，单击“查询”命令按钮后，表格控件（名称grid1）中显示相应工程所使用的零件的零件名、颜色和重量（通过设置有关“数据”属性实现），并将结果按“零件名”升序排列存储到pp.dbf文件。,单击“退出”按钮关闭表单。,完成表单设计后运行表单，并查询,工程号为“J4”,的相应信息。,表格,Name,属性,grid1,，,RecordSourceType,属性,0表,。,3.在Command1按钮的Click事件中输入：,select 零件名,颜色,重量 from 零件join 供应;,on 零件.零件号=供应.零件号 where 工程号=;,alltrim(thisform.text1.value),order by 零件.零件名;,into table,pp,.dbf,thisform.grid1.recordsource=pp,【捷径】题目给出具体工程号，并要求运行得到表，以工程号,“J4”,作为条件，用查询设计器做好后运行。,5三表文件(,要运行,),第5套三,、在文本框text1中输入某人的姓名，然后单击查询，则在表格控件Grid1中会显示出他所持有的全部外币名称及对应的人民币数量，并按人民币数量降序排序，同时将结果存储到自由表DBFA中。查询“,林诗因,”的外币市值情况。,select 外币名称,现钞买入价*持有数量 as 人民币数量;,from currency_sl join rate_exchange;,on currency_sl.外币代码=rate_exchange.外币代码;,where 姓名=,alltrim(thisform.text1.value);,order by 人民币数量 desc,into table DBFA,thisform.grid1.recordsource,=DBFA,【捷径】题目给出具体姓名，并要求运行得到表，以姓名“,林诗因,”作为条件，用查询设计器做好后运行。,45,表,文件,(要运行),第45套二1.,设置查询按钮的Click事件代码，使得表单运行时单击该按钮能够完成如下查询功能：从customers表中查询指定日期以后出生的客户，查询结果依次包含姓名、性别、出生日期三项内容，各记录按出生日期降序排序，查询去向为表tableone。,最后运行该表单，查询,1980年1月1日以后,出生的客户。,设置文本框的,Value属性值为表达式Date(),SELECT 姓名,性别,出生日期 FROM customers WHERE 出生日期=,ctod(thisform.Text1.Text);,ORDER BY 出生日期 DESC INTO TABLE tableone.dbf【用设计器后修改】,【捷径】题目给出具体日期，并要求运行得到表，以,1980年1月1日,作为条件，用查询设计器做好后运行。,37三 表文件,(要运行)【捷径】同45,第37套三(1)查询（Command1）按钮：在该按钮的Click事件中使用SQL的SELECT命令查询结帐日期等于从文本框输入日期的顾客序号、顾客姓名、单位和消费金额，查询结果按消费金额降序排序，并将查询结果存储到表TABC中。查询结帐日期等于,2005-10-01,的顾客信息。,(2)显示（Command2）按钮：在该按钮的Click事件中使用命令将表TABC中记录在表格控件中显示,将表格的,RecordSourceType,属性,4-SQL说明,。,设置查询按钮的Click事件代码：,Select 顾客序号,顾客姓名,单位,消费金额 from结帐表;,where 结帐日期=,ctod(thisform.text1.,text,);,order by 消费金额 desc INTO TABLE tabc.dbf,设置显示按钮的Click事件代码：,thisform.grid1.recordsource,=;,Select 顾客序号,顾客姓名,单位,消费金额 from结帐表;where 结帐日期=,ctod(thisform.text1.,text,);,order by 消费金额 desc INTO TABLE tabc.dbf。,完全相同的语句,49,表,文件,(要运行),第49套三、,单击命令按钮可以查询指定商品（由用户在文本框给定商品号）的订购信息，查询结果依次包含订单号、客户名、签订日期、商品名、单价和数量等六项内容。各记录按订单号升序排序。查询结果存放在表,tablethree,中。,最后运行表单，然后在文本框中输入商品号,a00002,，并单击确定按钮完成查询。,select Order.*,商品名,单价,数量;,from goods,orderitem,order;,where Order.订单号=Orderitem.订单号 and;,Goods.商品号=Orderitem.商品号 and;,Goods.商品号=,thisform.Text1.Text,;,order by Order.订单号 into table tablethree.dbf,【捷径】题目给出具体商品号，并要求运行得到表，以,a00002,作为条件，用查询设计器做好后运行。,28三 表文件（,要运行,）,第28套三 使用SQL语句根据学院表的系名字段的内容在列表框中显示系名（注意不要使用命令指定这两个属性）。程序的功能是根据表单运行时列表框中选定的系名，将教师表表中相应系的所有记录存入以该系名命名的自由表中，自由表中包含职工号，姓名和工资三个字段，并按照职工号升序排列。运行表单，分别生成存有计算机、通信、信息管理系信息的3个表。,为“生成表”命令按钮的单击事件编写程序如下：,select 职工号,姓名,工资 from 教师表 join 学院表;,on 学院表.系号=教师表.系号 order by 职工号;,Where 系名=thisform.list1.,list(thisform.list1.listindex),;,into tabl thisform.list1.,list(thisform.list1.listindex),【捷径】题目给出具体系名，并要求运行得到表，以“计算机”、“通信”、“信息管理”作为条件及文件名，用查询设计器做3个表，要运行。,（1）where 系名=计算机,into tabl 计算机,（2）where 系名=通信,into tabl 通信,（3）where 系名=信息管理,into tabl 信息管理,三、综合应用（1小题，计30分）,在考生文件夹下完成下列操作：,(1)创建自由表tablethree，其结构如下：,姓名 C（6）,最高金额 N（6，2）,最低金额 N（6，2）,平均金额 N（6，2）,(2)设计一个进行查询统计的表单formtwo.scx，其界面如下图所示。其中表格的名称为Grid1，查询统计按钮的名称为Command1，退出按钮的名称为Command2，文本框的名称为Text1。,当在文本框输入某职员姓名并单击查询统计按钮时，会在左边的表格内显示该职员所签各订单的金额，并将其中的最高金额、最低金额和平均金额存入表tablethree中。,单击退出按钮将关闭表单。,(3)运行上面创建的表单formtwo，然后依次查询统计赵小青和吴伟军两位职员所签订单的有关金额。执行完后，表tablethree中应该包含两条相应的记录。,25三表文件,【捷径】题目给出具体职员姓名,赵小青和吴伟军,，,用查询设计器做好后，,直接向,tablethree,表加记录。,39,三,1.建立一个文件名和表单名均为oneform的表单，表单中包括两个标签（Label1和Label2）、一个选项组（Optiongroup1）、一个组合框（Combo1）和两个命令按钮（Command1和Command2），Label1和Label2的标题分别为工资和实例，,2.将组合框（Combo1）的RowSourceType和RowSource属性手工指定为5和a，然后在表单的Load事件代码中定义数组a并赋值，使得程序开始运行时，组合框中有可供选择的工资实例3000、4000和5000。,3.为生成命令按钮编写程序。程序的功能是：表单运行时，根据选项组和组合框中选定的值，将教师表中满足工资条件的所有记录存入自由表,salary.dbf,中，表中的记录先按工资降序、再按姓名升序排列。,4.为退出命令按钮设置Click事件代码，其功能是：释放表单。,5.运行表单，在选项组中选择,小于,，在组合框中选择,4000,，单击生成命令按钮，最后，单击退出命令按钮。,选项组（Optiongroup1）中有两个选项按钮，标题分别为大于等于和小于，Command1和Command2的标题分别为生成和退出。如图所示。,39,三,捷径：,【捷径】用查询设计器：,直接用工资“,小于,”“,4000,”的条件,select*from 教师表 order by 工资 desc,姓名;,where,工资=1985 AND YEAR(职工.出生日期)=1989,;,ORDER BY 出生日期,编号 INTO TABLE cyqk.dbf,90,二,捷径,90三单击查询按钮，查询指定部门所有职工的信息，包括职工的姓名、性别、出生日期和编号，按编号升序排序。查询结果不仅显示在表单右侧的表格中，也保存在表文件tableone.dbf中。在文本框中输入部门名称开发部，,【捷径】,用查询设计器：SELECT 姓名,性别,出生日期,编号 FROM 部门 JOIN 职工;,ON 部门.部门编号=职工.部门编号 WHERE 名称=,开发部;,ORDER BY 编号 INTO TABLE tableone.dbf,st=SELECT 姓名,性别,出生日期,编号 FROM 职工,部门 WHERE 职工.部门编号=部门.部门编号 AND;,部门.名称=,thisform.Textone.Tex,t INTO TABLE tableone.dbf ORDER BY 职工.编号,thisform.Gridone.RecordSource=st,90,三,捷径,(建立表table3,)从xuesheng表和chengji表中找出所有成绩不及格（分数小于60）的学生信息（学号、姓名、课程名和分数），并把这些数据保存到表table3中（若一个学生有多门课程不及格，在表table3中就会有多条记录）。表table3中的各记录应该按分数升序排序，分数相同则按学号降序排列。,要求在程序中用SET RELATION命令建立chengji表和xuesheng表之间的关联（同时用INDEX命令建立相关的索引），并通过DO WHILE循环语句实现规定的功能。最后运行程序。,捷径,（15分）,本题程序过难，直接做table3表,用查询设计器从chengji表中找出分数有小于60的记录。,手工填入table3表,17三,学号,数学,英语,信息技术,2000100101,78,80,92,2000100102,86,86,88,2000100103,92,72,95,2000100104,82,80,90.5,2000100105,88,82,93,2000100106,69,88,85,2000100107,89,87,89,2000100108,75,80,86,2000100109,56,86,78,2000100110,90,92,73.5,2000100111,88,80,86,2000100112,87,85,90,2000100113,85,55,87,2000100114,88,90,89,2000100115,79,78,92,2000100116,58,60,70,2000100117,70,80,75,2000100118,85,80,89,2000100119,86,88,85,2000100120,90,79,95,2000100121,80,85,86,2000100122,90,84,92,2000100123,85,80,50,2000100124,60,80,53,2000100125,78,90,94,2001100101,96,48,95,2001100102,86,88,90,2001100103,87,79,86,2001100104,54,78,80,2001100105,76,90,94,2001100106,90,92,76,2001100107,80,85,90,2001100108,90,80,92,2001100109,100,94,82,2001100110,90,80,88,2001100111,79,80,100,2001100112,56,49,80,2001100113,80,70,69,2001100114,79,80,88,2001100115,75,88,90,2001100116,89,98,86,2001100117,90,88,85,2001100118,100,90,80,2001100119,90,100,74,2001100120,80,90,98,2001100121,58,90,98,2001100122,87,89,90,2001100123,81,80,90,2001100124,87,89,85,2001100125,90,79,92,2001100126,80,87,84,学号,数学,英语,信息技术,2000100109,56,86,78,2000100113,85,55,87,2000100116,58,60,70,2000100123,85,80,50,2000100124,60,80,53,2001100101,96,48,95,2001100104,54,78,80,2001100112,56,49,80,2001100121,58,90,98,学号,姓名,课程名,分数,2000100101,王茵茵,英语,48,2000100112,周勇,英语,49,2000100123,信息技术,50,table3,chengji,17三 表,