《VFP解题捷径》PPT课件.ppt

第3套一3 一 基本操作题3 用SQL命令向SCORE1表插入一条记录 学号为 993503433 课程号为 0001 成绩是99 捷径 用 数据工作期 打开表 点 浏览 选菜单 显示 追加方式 直接输入记录 SQL命令保存在哪 第4套三 捷径 1 用查询设计器select fromBOOKSintotableBOOKSBAK 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零件信息innerjoin使用零件innerjoin项目信息 on使用零件 项目号 项目信息 项目号 on零件信息 零件号 使用零件 零件号 where使用零件 零件号in select零件号from使用零件where项目号 s1 intotableitem temp orderby使用零件 项目号desc 第8套二 1表 项目信息 使用零件 零件信息 第14套 捷径 对照score1和course中的课程号 手工删除两个表有相同课程号的记录用查询设计器 SELECT课程名 开课单位FROMcourse ORDERBY课程名INTOTABLEnew table2 忽略最难步骤 二 2 在SCORE MANAGER数据库中查询没有学生选修的课程 查询结果含 课程名 和 开课单位 字段 结果按课程名升序保存在一个新表NEW TABLE2中 注意 字段名 开课单位 是在基本操作中根据 开课系部 修改后的字段名 避繁就简 score1 course 第14套表 42表文件 不运行 第42套三 设置 查询 命令按钮的Click的事件代码 其功能是 根据文本框Text1中的输入日期 查询各会员在指定日期后 大于等于指定日期 签订的各商品总金额 查询结果的字段包括 会员号 来自Customer表 姓名 和 总金额 三项 其中 总金额 为各商品的数量 来自Orderitem表 乘以单价 来自Article表 的总和 查询结果的各记录按总金额升序排序 查询结果存放到表dbfa dbf中 将文本框的Value属性值设置为 date 设置 查询 按钮的Click事件代码 SELECTCustomer 会员号 姓名 sum 数量 单价 as总金额 FROMcustomer orderitem article WHEREArticle 商品号 Orderitem 商品号AND Customer 会员号 Orderitem 会员号AND 日期 ctod thisform Text1 Text ORDERBY3 GROUPBYCustomer 会员号INTOTABLEdbfa dbf 捷径 题目没给具体日期 不需要得到表 可以任取一个日期作为条件 用查询设计器 50二表文件 不运行 第50套二 2 单击命令按钮可以查询在文本框中输入的指定客户的所有订单的信息 查询结果依次包含订单号 签订日期 商品名 单价和数量等五项内容 各记录按订单号升序排序 订单号相同按商品名升序排序 并将查询结果存放在表tabletwo中 用设计器后修改 SELECTOrder 订单号 签订日期 商品名 单价 数量 FROMorderJOINorderitemJOINgoods ONOrderitem 商品号 Goods 商品号 ONOrder 订单号 Orderitem 订单号 WHERE客户名 thisform Text1 Text ORDERBYOrder 订单号 商品名 INTOTABLEtabletwo dbf 捷径 题目没给具体客户名 不需要得到表 可以任取一个客户名作为条件 用查询设计器 73三表文件 不运行 第73套三 单击列表框中的数据项时 统计选修了所选课程的学生人数 从 考试成绩 表 并将结果存储在以课程名命名的表中 表中只有一个字段 人数 答案 列表框List1的属性设置如下 对象属性属性值List1ROWSOURCE课程 课程名List1ROWSOURCETYPE6 字段 设置 list1 列表框的Click事件代码 selectcount dist学号 as人数from课程join考试成绩 on课程 课程编号 考试成绩 课程编号where 课程名 thisform list1 list thisform list1 listindex intotablthisform 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 orderby零件 零件名 intotablepp dbfthisform grid1 recordsource pp 捷径 题目给出具体工程号 并要求运行得到表 以工程号 J4 作为条件 用查询设计器做好后运行 5三表文件 要运行 第5套三 在文本框text1中输入某人的姓名 然后单击 查询 则在表格控件Grid1中会显示出他所持有的全部 外币名称 及对应的 人民币数量 并按人民币数量降序排序 同时将结果存储到自由表DBFA中 查询 林诗因 的外币市值情况 select外币名称 现钞买入价 持有数量as人民币数量 fromcurrency sljoinrate exchange oncurrency sl 外币代码 rate exchange 外币代码 where姓名 alltrim thisform text1 value orderby人民币数量descintotableDBFAthisform grid1 recordsource DBFA 捷径 题目给出具体姓名 并要求运行得到表 以姓名 林诗因 作为条件 用查询设计器做好后运行 45表文件 要运行 第45套二1 设置 查询 按钮的Click事件代码 使得表单运行时单击该按钮能够完成如下查询功能 从customers表中查询指定日期以后出生的客户 查询结果依次包含姓名 性别 出生日期三项内容 各记录按出生日期降序排序 查询去向为表tableone 最后运行该表单 查询1980年1月1日以后出生的客户 设置文本框的Value属性值为表达式Date SELECT姓名 性别 出生日期FROMcustomersWHERE出生日期 ctod thisform Text1 Text ORDERBY出生日期DESCINTOTABLEtableone 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 orderby消费金额descINTOTABLEtabc dbf 设置 显示 按钮的Click事件代码 thisform grid1 recordsource Select顾客序号 顾客姓名 单位 消费金额from结帐表 where结帐日期 ctod thisform text1 text orderby消费金额descINTOTABLEtabc dbf 完全相同的语句 49表文件 要运行 第49套三 单击命令按钮可以查询指定商品 由用户在文本框给定商品号 的订购信息 查询结果依次包含订单号 客户名 签订日期 商品名 单价和数量等六项内容 各记录按订单号升序排序 查询结果存放在表tablethree中 最后运行表单 然后在文本框中输入商品号a00002 并单击 确定 按钮完成查询 selectOrder 商品名 单价 数量 fromgoods orderitem order whereOrder 订单号 Orderitem 订单号and Goods 商品号 Orderitem 商品号and Goods 商品号 thisform Text1 Text orderbyOrder 订单号intotabletablethree dbf 捷径 题目给出具体商品号 并要求运行得到表 以a00002作为条件 用查询设计器做好后运行 28三表文件 要运行 第28套三使用SQL语句根据 学院表 的 系名 字段的内容在列表框中显示 系名 注意不要使用命令指定这两个属性 程序的功能是根据表单运行时列表框中选定的 系名 将 教师表 表中相应系的所有记录存入以该系名命名的自由表中 自由表中包含 职工号 姓名 和 工资 三个字段 并按照 职工号 升序排列 运行表单 分别生成存有 计算机 通信 信息管理 系信息的3个表 为 生成表 命令按钮的单击事件编写程序如下 select职工号 姓名 工资from教师表join学院表 on学院表 系号 教师表 系号orderby职工号 Where系名 thisform list1 list thisform list1 listindex intotablthisform list1 list thisform list1 listindex 捷径 题目给出具体系名 并要求运行得到表 以 计算机 通信 信息管理 作为条件及文件名 用查询设计器做3个表 要运行 1 where系名 计算机 intotabl计算机 2 where系名 通信 intotabl通信 3 where系名 信息管理 intotabl信息管理 三 综合应用 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教师表orderby工资desc 姓名 where工资 4000intotablesalary 81二1 1 使用SQL语句查询每个职工所经手的具有最高金额的订购单信息 orders表 并将结果按金额升序 金额相同按订购单号升序存储到表results中 答案SQL语句为 SELECT FROMordersORDERBY金额 订购单号 WHERE职工号 str 金额 10 0 IN SELECT职工号 str MAX orders 金额 10 0 FROMordersGROUPBY职工号 INTOTABLEresults 81二1 捷径 1 用查询设计器 SELECT FROMordersORDERBY金额 订购单号INTOTABLEresults2 加删除记号3 选菜单 表 删除记录 81二1orders 81二1results 查询 按钮 在该按钮的 Click 事件中使用SQL的SELECT命令查询顾客号等于输入的 顾客号 的顾客的顾客号 顾客名和地址 以及购买商品的商品号 商品名 单价 数量和金额 各商品记录按商品号升序排序 将查询的顾客信息在表格控件Grid1中显示 同时将结果存储到表TABB中 将查询的顾客购买商品的结果在表格控件Grid2中显示 同时将结果存储到表TABC中 注意 每件商品的 金额 是由COMM表中该商品的单价 ORDER表中该商品的订购数量计算得到 表TABB和表TABC结构分别如下 TABB 顾客号 顾客名 地址 TABC 商品号 商品名 单价 数量 金额 表单设计完成后 运行该表单 查询顾客号等于 010003 的顾客信息和购买的商品信息 83三 83三CUST 83三ORDERCOMM 答案 设置 查询 按钮的Click事件代码 GKh ALLTRIM ThisForm Text1 Value ThisForm Grid1 RecordSource SELECT顾客号 顾客名 地址FROMCUSTWHERE顾客号 GKh INTOTABLETABB ThisForm Grid2 RecordSource SELECTComm 商品号 商品名 单价 数量 Comm 单价 Order 数量as金额FROMcdb commINNERJOINcdb orderONComm 商品号 Order 商品号WHERE顾客号 GKh INTOTABLETABC 捷径 用查询设计器做表 直接用条件顾客号 01003 1 SELECT顾客号 顾客名 地址FROMCUSTWHERE顾客号 01003 INTOTABLETABB2 SELECTComm 商品号 商品名 单价 数量 单价 数量as金额FROMcommJOINorderONComm 商品号 Order 商品号WHERE顾客号 01003 INTOTABLETABC 83捷径 三 综合应用 1 查询 按钮 Command1 在该按钮的Click事件中编写程序 采用SQL语句根据第1个文本框输入的顾客号进行查询 在表格控件中显示该顾客的顾客号和购买的每件商品的商品号 商品名 单价 数量和金额 各记录按商品号升序排序 该查询结果应同时存储到表tjb dbf中 另外需要统计该顾客的应付款 并显示在Text2文本框中 说明 金额 单价 数量 应付款 顾客购买的商品金额合计表单设计完成后 运行该表单 输入顾客号 010003 单击 查询 按钮进行查询 捷径 顾客号直接取 010003 1 用查询设计器 SELECT顾客号 Comm 商品号 商品名 单价 数量 单价 数量as金额 FROMcommJOINorderONComm 商品号 Order 商品号 WHERE顾客号 010003 orderbyComm 商品号INTOTABLEtjb ThisForm Grid1 RecordSource SELECTOrder 顾客号 Comm 商品号 商品名 单价 数量 Comm 单价 Order 数量as金额FROMcdb commINNERJOINcdb orderONComm 商品号 Order 商品号WHERE顾客号 ALLTRIM ThisForm Text1 Value orderbyComm 商品号INTOTABLEtjb 84捷径 二 1 编写程序文件prgone prg 其功能是从 人事管理 数据库的相关表中查询销售部从1985年到1989年这5年出生的所有职工的信息 并存到表cyqk dbf中 查询结果包含编号 姓名 出生日期和部门名称 部门表中的名称 4个字段 按职工的出生日期和编号升序排序 最后运行该程序 捷径 1 用查询设计器 SELECT编号 姓名 出生日期 名称FROM部门JOIN职工 ON部门 部门编号 职工 部门编号ORDERBY出生日期 编号 INTOTABLEcyqk2 打开cyqk表 直接删除不满足条件的记录3 打开表设计器把字段 名称 改成 部门名称 SELECT编号 姓名 出生日期 名称AS部门名称FROM部门 职工 WHERE部门 部门编号 职工 部门编号AND部门 名称 销售部 ANDYEAR 职工 出生日期 1985ANDYEAR 职工 出生日期 1989 ORDERBY出生日期 编号INTOTABLEcyqk dbf 90二捷径 90三单击 查询 按钮 查询指定部门所有职工的信息 包括职工的姓名 性别 出生日期和编号 按编号升序排序 查询结果不仅显示在表单右侧的表格中 也保存在表文件tableone dbf中 在文本框中输入部门名称 开发部 捷径 用查询设计器 SELECT姓名 性别 出生日期 编号FROM部门JOIN职工 ON部门 部门编号 职工 部门编号WHERE名称 开发部 ORDERBY编号INTOTABLEtableone dbf st SELECT姓名 性别 出生日期 编号FROM职工 部门WHERE职工 部门编号 部门 部门编号AND 部门 名称 thisform Textone TextINTOTABLEtableone dbfORDERBY职工 编号 thisform Gridone RecordSource st 90三捷径 建立表table3 从xuesheng表和chengji表中找出所有成绩不及格 分数小于60 的学生信息 学号 姓名 课程名和分数 并把这些数据保存到表table3中 若一个学生有多门课程不及格 在表table3中就会有多条记录 表table3中的各记录应该按分数升序排序 分数相同则按学号降序排列 要求在程序中用SETRELATION命令建立chengji表和xuesheng表之间的关联 同时用INDEX命令建立相关的索引 并通过DOWHILE循环语句实现规定的功能 最后运行程序 捷径 15分 本题程序过难 直接做table3表用查询设计器从chengji表中找出分数有小于60的记录 手工填入table3表 17三 table3 chengji 17三表