《数据查询与统计》PPT课件

《《数据查询与统计》PPT课件》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、上一次课讲到创建数据库、使用命令显示与操作记录、创建与使用可视类、使用表格显示与操作记录、使用TreeView控件显示记录、表单之间传递数据。请同学们回顾这样两个问题：数据库表结构中项目组成？2.如何添加、编辑自定义方法？1.字段名称、类型、宽度、小数位数、索引方式；2.字段格式、输入掩码、标题；3.字段有效性规则；4.字段注释。①添加方法：菜单：表单/新建属性/输入上面的属性名/添加②建立以后，可以通过“菜单：表单/编辑属性/方法程序”进行编辑。③对表单对象新建方法程序内容的编辑与对象事件过程编辑相同。

2、上一次课主要学习的内容本章主要介绍VFP中的数据查询命令，SQL查询语句，在表单中定位记录，过滤记录以及数据统计。第2章.数据查询与统计VFP中数据查询命令分类：VFP中数据查询命令可以分为顺序查询、索引查询和过滤记录3种。2.1数据查询命令格式:LOCATE[<范围>]FOR<条件>格式:CONTINUE功能:定位到第一个符合条件的记录位置,CONTINUE定位下一个符合条件的记录注意：该命令只能在当前工作区查询。2.1.1顺序查询在下列示例中，定位德国顾客的记录，然后显示总数。CLOSEDATABAS

3、ESOPENDATABASE(HOME(2)+'Datatestdata')USEcustomer&&打开customer表SETTALKOFFSTORE0TOgnCountLOCATEFORALLTRIM(UPPER(customer.country))='GERMANY'DOWHILEFOUND()gnCount=gnCount+1?companyCONTINUEENDDO?'总的德国客户数:'+LTRIM(STR(gnCount)).Locate例命令格式：SEEK<表达式>功能：SEEK在一个表

4、中搜索首次出现的一个记录，这个记录的索引关键字必须与指定的表达式匹配。2.1.2索引查询完整的命令格式：SEEKeExpression[ORDERnIndexNumber

5、IDXIndexFileName

6、[TAG]TagName[OFCDXFileName][ASCENDING

7、DESCENDING]][INnWorkArea

8、cTableAlias]说明：只能在索引过的表中使用seek命令，并且只能搜索索引关键字。除非SETEXACT的设置为OFF，否则匹配指的是完全匹配。如果SEEK找到了与索引关键

9、字相匹配的记录，则RECNO()返回匹配记录的记录号；FOUND()返回“真”(.T.)；EOF()返回“假”(.F.)。如果找不到相匹配的关键字，则RECNO()将表中记录的个数加1，然后返回；FOUND()返回“假”(.F.)；EOF()返回“真”(.T.)。如果SETNEAR设置为ON，则记录指针指向与索引关键字最相匹配的那个记录的后面一个记录。如果SETNEAR设置为OFF，则记录指针指向文件的结尾。在这两种情况下，RECNO(0)都返回与关键字最匹配的记录号。CLOSEDATABASESOPEN

10、DATABASE(HOME(2)+'Datatestdata')USEcustomerORDERcompany&&打开Customer表SETEXACTOFFSTORE'B'TOgcSeekValSEEKgcSeekValIFFOUND()DISPLAYFIELDScompany,contactENDIF示例中，先打开customer表，并按company字段建立索引。然后，用seek命令查找与内存变量gcseekval的值相匹配的索引关键字表达式。.Seek例VFP记录过滤是从逻辑上过滤掉不符合条件的

11、记录，不真正删除。记录过滤可以将不需要的记录屏蔽掉。命令格式：SETFILTERTO[表达式][IN区号

12、别名]功能：指定访问当前表中记录时必须满足的条件。[表达式]--指定记录必须满足的条件。[IN区号

13、别名]指定受SETFILTER命令影响的工作区或表别名。用该子句来指定一个当前工作区以外的工作区或表。关闭过滤功能命令：SETFILTERTO说明：该命令对Select-SQL不起作用。函数FILTER([IN区号

14、别名])返回SETFILTER命令中指定的表筛选表达式。2.1.3记录过滤CLOSEDA

15、TABASESOPENDATABASE(HOME(2)+'Datatestdata')USEcustomer&&打开Customer表SETTALKONSETFILTERTOSUBSTR(cust_id,1)='B'CLEAR?FILTER()&&显示filterexpressionSTOREFILTER('customer')TOgcOldFilter&&SavefilterexpressionSETFILTERTOcou