11.VFP查询统计及扫描循环概论.ppt

4.多功能计算命令 命令格式： calculate 表达式表 to 内存变量表 …… CNT()、SUM(数值表达式)、AVG(数值表达式) 、MAX(表达式) 、 MIN(表达式) C、N、D （教科书P158） 学号 姓名 英语 计算机 数学 001 张三 85 82 76 002 李四 70 95 63 003 王武 40 70 83 Sum 英语,计算机,数学,英语+计算机+数学 to yy1,jsj1,sx1,zf1 Average 英语,计算机,数学,英语+计算机+数学 to yy2,jsj2,sx2,zf2 Count to rs Calculate sum(计算机),avg(英语),cnt(),max(英语+计算机+数学),min(数学) to jsj3,yy3,zf3,sx3 纵向求和 纵向求平均 统计记录数 =（85+82+76）+（70+95+63）+（40+70+83） 5. 分类汇总 命令格式： total on 关键字段 to 汇总表文件名 [fields 字段名表]…… 汇总字段，必须是数值型字段 必须索引或排序 关闭的表文件 （教科书P159） 【例6-9】计算图书表中每个出版社的图书数量。 表单Form1的Init事件代码如下： set safety off use 图书 index on 出版社 tag cbs total to sl on 出版社 fields 数量 use sl copy to sl1 fields 出版社,数量 thisform.grid1.recordsourcetype=0 thisform.grid1.recordsource=sl1 set safety on 学号 姓名 性别 年龄 积分 001 张三 男 30 20 002 李四 女 25 10 003 王五 男 40 50 004 赵七 男 22 30 005 孙六 女 50 20 【EXM6】有如下数据表jf.dbf，按性别汇总积分。 命令按钮的click事件代码： Set safety off index on 性别 tag xb total on 性别 to hz fields 积分 thisform.grid1.recordsource=hz thisform.refresh Set safety on 表单的Unload事件代码：Close all 要点： 1. 掌握索引排序 2.掌握表中的数据查询 3.掌握表中的数据统计 4.掌握数据表中的扫描循环 数据表的查询统计 1.顺序查询(条件定位) locate [范围] for 条件 命令格式： 继续查找命令 命令格式： continue 配对使用 不能单独使用 （教科书P150） 数据表的查询 【例6-1】在读者信息表中逐条显示男读者信息。 表单Form1的Init事件代码如下： LOCATE FOR 性别=男” “下一条”按钮的Click事件代码如下： Continue if found()或 not eof() thisform.refresh else messagebox(已查询完毕！) this.enabled=.f. endif 命令按钮呈灰色显示 刷新表单，使表单中 的各控件显示新记录 的值。 找不到，指针指到结束位置 ex1.设计如图所示表单，将下表所示的产品信息数据表 （CP.DBF）添加到表单的数据环境中。 产品编号 商品名称 规格 单价 001 电视机 CTV-0134 2980 002 电冰箱 EBG-02187 3160 003 洗衣机 XYJ-03405 1880 表单运行后在文本框Text1中输入产品编号，按回车键后，将显示该产品的名称、规格及单价。编写文本框TEXT1的VALID事件代码。 文本框text1的“Valid”事件代码如下： x=alltrim(thisform.text1.value) locate for 产品编号=x thisform.text2.value=商品名称 thisform.text3.value=规格 thisform.text4.value=单价 ex2.设计如图（左）所示表单，将表所示教师表(JS.DBF)添加到表单的数据环境中。 教师编号 姓名 性别 职称 生日 J820213 毛峰 男 教授 1960-2-24 F820308 菊豆 女 副教授 1964-3-3 S821034 章潜 女 讲师 1970-3-12 S821105 王绍坪 男 讲师 1985-3-8 表单运行后，在组合框c