Download presentation
Presentation is loading. Please wait.
1
第三章 Visual FoxPro数据库和表
本章教学要求：掌握数据库和表的建立，对表的基本操作。 3．1 Visual FoxPro数据库和表的建立 3．2 Visual FoxPro表记录的操作 3．3 表的统计 3．4 表的索引 3．5 多表操作
2
3.1 Visual FoxPro数据库和表的建立
应当说明的是数据库是表、视图和连接等的集合，数据记录内容是存放在表中的，如图3-1所示。
3
学生学籍库 课程表 成绩表 学生基本信息表 图3-1 学生学籍库的组成
4
3．1．1 数据库的建立 在Visual FoxPro中有多种方法建立数据库。 l 在命令窗口中输入命令 格式：Create database 数据库名 例如：在命令窗口中输入： Create database c:\学籍管理\学生学籍库 将在“c:\学籍管理”文件夹下创建一个文件名为“学生学籍库.DBC”数据库。
5
l 通过菜单或工具栏上的“新建”命令 步骤：
点击工具栏上的“新建”按钮，出现如图3-2所示的 “新建”对话框，选择“数据库”，然后点击“新建文件” 按钮，出现“创建”对话框，输入文件名c:\学籍管理\学生学籍库(如图3-3所示)，点击“保存” 按钮，屏幕上将出现“数据库设计器”窗口，如图3-4所示。 图3-2 新建对话框
6
图3-3创建对话框
7
图3-4 数据库设计器窗口
8
l 使用数据库向导创建数据库 步骤： 点击工具栏中的“新建”按钮，出现“新建”对话框，选择“数据库”，然后点击“向导” 按钮，按照屏幕指示进行操作即可。 3．1．2 数据库的打开与关闭 1. 打开数据库 l 使用Open DataBase命令 格式：Open DataBase [<数据库名|?>] [Shared|Exclusive][Noupdate][Validate]
9
命令参数： 若省略数据库名或用？代替数据名，则系统将显示“打开”对话框，让用户从中选择现有的数据库。 Shared：表式以共享方式打开数据库。 Exclusive：表式以独占方式打开数据库。 Noupdate：指定不能对数据库进行修改操作，即只能对数据库进行读操作。 Validate：指定在打开数据库时对数据库中的表和索引是否可用进行检查。 例如：打开c:\学籍管理\学生学籍库.dbc数据库 open database c:\学籍管理\学生学籍库
10
l 在Visual FoxPro的集成环境中打开数据库
点击工具栏中的“Open”按钮，然后在“打开”对话框中选择要打开的数据库文件。 说明：当数据库打开后，若要使用表还必须使用Use命令打开表。 2. 关闭数据库 l 使用Close DataBase命令 格式：Close DataBase [All] 命令参数：
11
All：关闭当前数据库和表，如果没有当前数据库，则关闭所有已打开的自由表、索引文件和格式文件，并把当前工作区设为1。
3．1．3 表的建立 在Visual FoxPro中表是非常重要的，数据都是以记录的形式存放在表中的，表由两部分组成：表结构和记录， 创建一个表时，首先应创建表结构，然后再根据需要输入数据，创建一个表结构时，应事先确定表结构的如下内容: l 字段名 只能以字母、下划线和汉字开始，后面可跟字母、数字、
12
下划线和汉字。每个字段名的最大长度不超过10个字符。 下列符号不能用于表字段名：
@ # $ % ^ & * 空格 ! ~ Visual FoxPro的保留字等 l 数据类型、宽度及小数据位数 Visual FoxPro表中常用的数据类型： Visual FoxPro字段数据类型表： 数据类型 宽度 （字节） 小数 位数 备注 字符型(Character) <=254 任意字符
13
字符型(Character)） <=254 任意字符 货币型(Currency) 8 数值型（Numeric） <=20
任意字符 货币型(Currency) 8 数值型（Numeric） <=20 <=19 浮动型（Float） <=20 <=19 日期型（Date） 8 日期时间型（DateTime） 8 双精度型（Double） 8 <=7 整型（Integer） 4 逻辑型（Logical） 1 备注型（Memo） 4 通用型（General） 保存OLE对象的引用 字符型（二进制）（Binary） <=254 保存数据不经代码页修改 备注型（二进制） （Memo Binary） 4 保存数据不经代码页修改
14
双精度型（Double） 8 <=7 整型（Integer） 4 逻辑型（Logical） 1 备注型（Memo） 4
整型（Integer） 4 逻辑型（Logical） 1 备注型（Memo） 4 通用型（General） 保存OLE对象的引用 字符型（二进制）（Binary） <=254 保存数据不经代码页修改 备注型（二进制） （Memo Binary） 4 保存数据不经代码页修改
15
在Visual FoxPro中创建新表的方法有多种，但通常是在Visual FoxPro的集成开发环境中点击“文件”菜单→“新建”，在弹出的新建对话框中选择“表”，然后选择“新建文件”按钮，屏幕上出现“创建”对话框，在该对话框中键入表文件名（如图3-5所示），键入表文件名后，点击“保存”按钮，屏幕上出现“表设计器”窗口，在“表设计器”窗口中输入表结构（如图3-6所示），输入完成后点击“确定”按钮，屏幕上出现“现在输入数据记录吗？”对话时，若选择“否”则不输入数据，若选择“是”则屏幕上出现数据记录输入窗口，可在其中输入数据（如图3-7所示），输入完成后关闭数据记录输入窗口即可。 注：备注型输入方法是当光标移动到备注型字段时按“Ctrl+PageDown”键，屏幕上就会出现输入备注型字段的编辑窗体，如图3-7所示。
16
图3-5 创建对话框
17
图3-6 表设计器-学生基本信息表结构
18
图3-7 数据记录输入
19
3．1．4 表的打开与关闭 1. 通过菜单操作打开表 操作步骤： 点击“文件”菜单→“打开”，屏幕上出现“打开”文件对话框，选择要打开的表文件（如图3-8所示），然后点击“确定”按钮即可。 注：在图3-8中，若选择了“以只读方式打开（R）”，则只能对打开的表进行读操作不能进行修改、删除和增加等操作；若选择了“独占”，则其它用户此时只能以共享方式打开该表。
20
图3-8 “打开”对话框
21
2. 通过命令打开表 在Visual FoxPro的命令窗口中使用Use命令打开表。 命令格式：Use <表文件名> [Shared|Exclusive][ Alias <别名>] 命令参数： Shared：指定以共享方式打开表，以这种方式打开的表，可以对表进行增加、删除和修改数据记录的操作，但不能修改表结构。 Exclusive：指定以独占方式打开表，以这种方式打开的表，除可以对表进行增加、删除和修改数据记录的操作，还可以修改修表的结构。
![2. 通过命令打开表 在Visual FoxPro的命令窗口中使用Use命令打开表。 命令格式：Use <表文件名> [Shared|Exclusive][ Alias <别名>] 命令参数：](http://slidesplayer.com/slide/16971329/97/images/21/2.+%E9%80%9A%E8%BF%87%E5%91%BD%E4%BB%A4%E6%89%93%E5%BC%80%E8%A1%A8+%E5%9C%A8Visual+FoxPro%E7%9A%84%E5%91%BD%E4%BB%A4%E7%AA%97%E5%8F%A3%E4%B8%AD%E4%BD%BF%E7%94%A8Use%E5%91%BD%E4%BB%A4%E6%89%93%E5%BC%80%E8%A1%A8%E3%80%82+%E5%91%BD%E4%BB%A4%E6%A0%BC%E5%BC%8F%EF%BC%9AUse+%3C%E8%A1%A8%E6%96%87%E4%BB%B6%E5%90%8D%3E+%5BShared%7CExclusive%5D%5B+Alias+%3C%E5%88%AB%E5%90%8D%3E%5D+%E5%91%BD%E4%BB%A4%E5%8F%82%E6%95%B0%EF%BC%9A.jpg "Shared：指定以共享方式打开表，以这种方式打开的表，可以对表进行增加、删除和修改数据记录的操作，但不能修改表结构。 Exclusive：指定以独占方式打开表，以这种方式打开的表，除可以对表进行增加、删除和修改数据记录的操作，还可以修改修表的结构。")
22
若不指定打开方式，则以独占方式打开表。 Alias <别名>：指定打开表的别名，若省略该参数，表的别名就是表名。 例如 要共享方式打开表C:\学籍管理\学生基本信息表.dbf，可使用如下命令： Use C:\学籍管理\学生基本信息表.dbf Shared 若要对表进行操作，必须先打开表。 3. 表的关闭 对表的操作完成后，应及时关闭表。 命令格式：Use
23
3.2 Visual FoxPro表记录的操作 3．2．1 记录指针定位
1. Go/GoTo命令 命令格式： Go/GoTo [[RECORD] <记录号>|<TOP>|<BOTTOM>] [In <工作区>|<表别名>] 命令功能：移动记录指针。
24
命令参数： [RECORD] <记录号>：将表记录指针移到<记录号>指定的记录。 TOP：将表记录指针移到第一条记录。 BOTTOM：将表记录指针移到最后一条记录。 [In <工作区>| <表别名>]：指定要移到记录表所在的工作区，若省略该参数则是对当前工作的表进行操作。 例如 将当前工作区的表的记录指针移到第3条记录，可使用如下命令： GoTo 3 或者
![命令参数： [RECORD] <记录号>：将表记录指针移到<记录号>指定的记录。 TOP：将表记录指针移到第一条记录。 BOTTOM：将表记录指针移到最后一条记录。 [In <工作区>| <表别名>]：指定要移到记录表所在的工作区，若省略该参数则是对当前工作的表进行操作。](http://slidesplayer.com/slide/16971329/97/images/24/%E5%91%BD%E4%BB%A4%E5%8F%82%E6%95%B0%EF%BC%9A+%5BRECORD%5D+%3C%E8%AE%B0%E5%BD%95%E5%8F%B7%3E%EF%BC%9A%E5%B0%86%E8%A1%A8%E8%AE%B0%E5%BD%95%E6%8C%87%E9%92%88%E7%A7%BB%E5%88%B0%3C%E8%AE%B0%E5%BD%95%E5%8F%B7%3E%E6%8C%87%E5%AE%9A%E7%9A%84%E8%AE%B0%E5%BD%95%E3%80%82+TOP%EF%BC%9A%E5%B0%86%E8%A1%A8%E8%AE%B0%E5%BD%95%E6%8C%87%E9%92%88%E7%A7%BB%E5%88%B0%E7%AC%AC%E4%B8%80%E6%9D%A1%E8%AE%B0%E5%BD%95%E3%80%82+BOTTOM%EF%BC%9A%E5%B0%86%E8%A1%A8%E8%AE%B0%E5%BD%95%E6%8C%87%E9%92%88%E7%A7%BB%E5%88%B0%E6%9C%80%E5%90%8E%E4%B8%80%E6%9D%A1%E8%AE%B0%E5%BD%95%E3%80%82+%5BIn+%3C%E5%B7%A5%E4%BD%9C%E5%8C%BA%3E%7C+%3C%E8%A1%A8%E5%88%AB%E5%90%8D%3E%5D%EF%BC%9A%E6%8C%87%E5%AE%9A%E8%A6%81%E7%A7%BB%E5%88%B0%E8%AE%B0%E5%BD%95%E8%A1%A8%E6%89%80%E5%9C%A8%E7%9A%84%E5%B7%A5%E4%BD%9C%E5%8C%BA%EF%BC%8C%E8%8B%A5%E7%9C%81%E7%95%A5%E8%AF%A5%E5%8F%82%E6%95%B0%E5%88%99%E6%98%AF%E5%AF%B9%E5%BD%93%E5%89%8D%E5%B7%A5%E4%BD%9C%E7%9A%84%E8%A1%A8%E8%BF%9B%E8%A1%8C%E6%93%8D%E4%BD%9C%E3%80%82.jpg "例如 将当前工作区的表的记录指针移到第3条记录，可使用如下命令： GoTo 3. 或者.")
25
Go 3 或者 3 2. Skip命令 命令格式：Skip [<数值表达式>] [In <工作区>|<表别名>] 命令功能：移动记录指针。 命令参数： <数值表达式>：指定记录指针移动的相对记录数，即若<数值表达式>为正数，表示记录指针向文件尾方向移动，为负数表示向文件头方向移动记录指针；若省略该参数，则表示记录指针向文件尾方向移动一个记录位置。
![Go 3 或者 Skip命令. 命令格式：Skip [<数值表达式>] [In <工作区>|<表别名>] 命令功能：移动记录指针。 命令参数：](http://slidesplayer.com/slide/16971329/97/images/25/Go+3+%E6%88%96%E8%80%85+Skip%E5%91%BD%E4%BB%A4.+%E5%91%BD%E4%BB%A4%E6%A0%BC%E5%BC%8F%EF%BC%9ASkip+%5B%3C%E6%95%B0%E5%80%BC%E8%A1%A8%E8%BE%BE%E5%BC%8F%3E%5D+%5BIn+%3C%E5%B7%A5%E4%BD%9C%E5%8C%BA%3E%7C%3C%E8%A1%A8%E5%88%AB%E5%90%8D%3E%5D+%E5%91%BD%E4%BB%A4%E5%8A%9F%E8%83%BD%EF%BC%9A%E7%A7%BB%E5%8A%A8%E8%AE%B0%E5%BD%95%E6%8C%87%E9%92%88%E3%80%82+%E5%91%BD%E4%BB%A4%E5%8F%82%E6%95%B0%EF%BC%9A.jpg "<数值表达式>：指定记录指针移动的相对记录数，即若<数值表达式>为正数，表示记录指针向文件尾方向移动，为负数表示向文件头方向移动记录指针；若省略该参数，则表示记录指针向文件尾方向移动一个记录位置。")
26
In <工作区>|<表别名>：指定要移动记录指针的工作区或表别名。
例如假设当前工作区的当前记录为12，总共有30条，执行如下程序： Skip – && 记录指针移到第11条记录 Skip – && 记录指针移到第1条记录 Skip && 记录指针移到第2条记录 Skip && 记录指针移到第30条记录，即最后一条 Skip && 出错，因为已到文件尾 与记录指针移动有关的函数有3个：
27
Recno( )：返回当前记录号。 Bof( )：测试记录指针是否已到文件头，若已到文件头返回.T.，否则返回.F.。 Eof( )：测试记录指针是否已到文件尾，若已到文件尾返回.T.，否则返回.F.。 3．2．2 增加记录 向表中增加记录主要有两种方式，一种是直接通过全屏幕方式从键盘输入数据，另一种是从其它表文件中把有关数据记录添加到表中。 1. 从键盘输入新记录
28
(1) Apppend命令 命令格式：Append [Blank] [In 工作区|表别名] [NoMenu] 命令功能：在表的最末尾添加记录。 命令参数： Blank：若有该参数，则在表的末尾添加一条新记录，若没有该参数，则屏幕上出现数据输入窗体，在该窗体中可进行添加记录操作，如图3-9所示。 In 工作区|表别名：指定要对哪一个工作区的表进行操作，省略该参数，则是向当前工作区的表添加记录。 NoMenu：指定从系统菜单中删除“表”菜单项。
![(1) Apppend命令 命令格式：Append [Blank] [In 工作区|表别名] [NoMenu] 命令功能：在表的最末尾添加记录。 命令参数：](http://slidesplayer.com/slide/16971329/97/images/28/%281%29+Apppend%E5%91%BD%E4%BB%A4+%E5%91%BD%E4%BB%A4%E6%A0%BC%E5%BC%8F%EF%BC%9AAppend+%5BBlank%5D+%5BIn+%E5%B7%A5%E4%BD%9C%E5%8C%BA%7C%E8%A1%A8%E5%88%AB%E5%90%8D%5D+%5BNoMenu%5D+%E5%91%BD%E4%BB%A4%E5%8A%9F%E8%83%BD%EF%BC%9A%E5%9C%A8%E8%A1%A8%E7%9A%84%E6%9C%80%E6%9C%AB%E5%B0%BE%E6%B7%BB%E5%8A%A0%E8%AE%B0%E5%BD%95%E3%80%82+%E5%91%BD%E4%BB%A4%E5%8F%82%E6%95%B0%EF%BC%9A.jpg "Blank：若有该参数，则在表的末尾添加一条新记录，若没有该参数，则屏幕上出现数据输入窗体，在该窗体中可进行添加记录操作，如图3-9所示。 In 工作区|表别名：指定要对哪一个工作区的表进行操作，省略该参数，则是向当前工作区的表添加记录。 NoMenu：指定从系统菜单中删除 表 菜单项。")
29
图3-9 向表中追加记录
30
例如，要向表“C:\学籍管理\学生基本信息表.dbf”添加一个空白记录，可在命令窗口中输入如下命令：
Use C:\学籍管理\学生基本信息表 &&若表文件的扩展名为.DBF可省略 Append Blank Use &&关闭表 (2) Insert命令 命令格式：Insert [Before] [Blank] 命令功能：在当前表中插入新的记录。 命令参数：
31
Before：在当前记录之前插入新记录，若没有该参数则是在当前记录之后插入新记录。
Blank：插入一条空记录，屏幕上不出现数据输入窗口；若没有该参数，屏幕上出现数据输入窗口，用户可以输入新的数据。 例如 在表“C:\学籍管理\学生基本信息表.dbf”的第3和第4条记录之间插入新的记录，可在命令窗口输入如下命令： Use C:\学籍管理\学生基本信息表.DBF Go &&使当记录指针指向第4条记录 Insert Use
32
2. 从其它表文件中把有关数据记录添加到表 命令格式： Append From [文件名|?] [Fields <字段列表>] [For <条件表达式>] 命令功能：从其它文件中将所需的数据复制到当前表中。 命令参数： 文件名：指定源数据文件名，即数据来自哪一个文件。 ?： 当执行该命令时，显示打开文件对话框，让用户从中选择一个源数据文件。
![2. 从其它表文件中把有关数据记录添加到表 命令格式： Append From [文件名| ] [Fields <字段列表>] [For <条件表达式>] 命令功能：从其它文件中将所需的数据复制到当前表中。](http://slidesplayer.com/slide/16971329/97/images/32/2.+%E4%BB%8E%E5%85%B6%E5%AE%83%E8%A1%A8%E6%96%87%E4%BB%B6%E4%B8%AD%E6%8A%8A%E6%9C%89%E5%85%B3%E6%95%B0%E6%8D%AE%E8%AE%B0%E5%BD%95%E6%B7%BB%E5%8A%A0%E5%88%B0%E8%A1%A8+%E5%91%BD%E4%BB%A4%E6%A0%BC%E5%BC%8F%EF%BC%9A+Append+From+%5B%E6%96%87%E4%BB%B6%E5%90%8D%7C+%5D+%5BFields+%3C%E5%AD%97%E6%AE%B5%E5%88%97%E8%A1%A8%3E%5D+%5BFor+%3C%E6%9D%A1%E4%BB%B6%E8%A1%A8%E8%BE%BE%E5%BC%8F%3E%5D+%E5%91%BD%E4%BB%A4%E5%8A%9F%E8%83%BD%EF%BC%9A%E4%BB%8E%E5%85%B6%E5%AE%83%E6%96%87%E4%BB%B6%E4%B8%AD%E5%B0%86%E6%89%80%E9%9C%80%E7%9A%84%E6%95%B0%E6%8D%AE%E5%A4%8D%E5%88%B6%E5%88%B0%E5%BD%93%E5%89%8D%E8%A1%A8%E4%B8%AD%E3%80%82.jpg "命令参数： 文件名：指定源数据文件名，即数据来自哪一个文件。 ： 当执行该命令时，显示打开文件对话框，让用户从中选择一个源数据文件。")
33
Fields <字段列表>：指定要将源表的哪些字段复制到当前表中，若有多个字段，字段之间用逗号“，”隔开，若省略该参数，则是将源表的所有字段值复制到当前表以对应的字段中去。
For <条件表达式>：指定添加记录的条件，只有符合条件的记录才会被添加到当前表中，若省略该参数，则是将源数据文件所有的记录添加到当前表中。 例如，C:\ 学籍管理\新生数据.DBF的内容如图3-10所示，C:\学籍管理\学生基本信息表.DBF的内容如图3-11所示。
34
图3-10新生数据表内容
35
图3-11学生基本信息表内容
36
将C:\ 学籍管理\新生数据.DBF文件中的所有记录复制到C:\学籍管理\学生基本信息表.DBF中，在命令窗口中输入如下命令：
Use C:\学籍管理\学生基本信息表.DBF Append From C:\学籍管理\新生数据.DBF Use 上述命令执行完后，表C:\学籍管理\学生基本信息表.DBF的内容如图3-12所示
37
图3-12 追加记录后学生基本信息表内容
38
3．2．3 删除记录与恢复 当表中的数据不再需要时，应将删除。为了防止误删除，在Visual FoxPro中删除记录分两步进行，第一步是逻辑删除，即只在要删除的记录上作一个删除标记，数据记录并没有真正从表中删除，当发现删除操作有误时，还可以用恢复命令将其恢复，显然只被逻辑删除的记录仍要占用硬盘空间，被逻辑删除的记录在列表显示（List或Display）时记录前有一个删除标记“*”或“■”（用Browse浏览记录时）；第二步是物理删除，即将作了删除标记的记录从硬盘中彻底删除，物理删除后的记录不可以再恢复。 1. 逻辑删除 命令格式：Delete [<范围>] [For <条件>] [While <条件>] [In <工作区>|<表别名>] 命令功能：对符合条件的记录进行逻辑删除。 命令参数： <范围>： 指定要操作的记录范围，该参数可以是： All：所有记录。 Next n：从当前记录开始的后面n个记录。 Record n：第n号记录。 Rest：从当前记录开始一直到文件结束。 For <条件>：指定要作删除标记的条件，依次对指定范围内的记录进行操作，若条件为真，对记录作删除标记，否则不作删除标记，然后再对下范围内的一个记录进行操作。 While <条件>：指定要作删除标记的条件，依次对指定范围内的记录进行操作，若条件为真，对记录作删除标记，若条件为假或已到范围内的最后一个记录则停止。 若省略范围、For <条件>和While <条件>参数，则只删除当前记录。 若省略范围，但有For <条件>或While <条件>参数，则缺省的范围为整个记录。 In <工作区>|<表别名>：指定要进行逻辑删除的表所在的工作区或表别名，若省略该参数，则是对当前工作区进行操作。 例如，假设当前表为前面的学生基本信息表，执行如下操作： Delete record && 给第5条记录加删除标记 Go && 给第7条记录成为当前记录 Delete && 给当前记录加删除标记 Delete for 学号=’ ’ &&给学号为 加删除标记。 List &&列表显示记录 记录号 学号 姓名 性别 出生日期 身高 简历 1 * 刘军 T /04/ memo 张平 T /13/ Memo 3 * 刘军 T /04/ memo 张平 T /13/ Memo 5 * 李光辉 T /14/ memo 张勇 T /17/ Memo 7 * 罗丽 F /04/ memo 欧阳德雷 .T /18/ Memo 2. 物理删除 命令格式：Pack 命令功能：将作了删除标记的记录从表中彻底删除，释放其所占的内存空间。 说明：要执行该命令，必须以独占方式打开表。 例如： Use C:\学籍管理\学生基本信息表.DBF exclusive Delete for 姓名=’李勇’ Pack Use 3. ZAP命令 命令格式：ZAP [IN <工作区> | <表别名>] 命令功能：物理删除表中的所有记录。 In <工作区> | <表别名>：指定要执行删除操作的工作区或表别名。 当要物理删除表中的所有记录可使用该命令，该命令与下面两条命令相当： delete all pack 4. 记录的恢复 命令格式：RECALL [<范围>] [FOR <条件>] [WHILE <条件>] 命令功能：取消已打删除标记记录的删除标记。 <范围>： 参见DELETE的命令参数说明。 For <条件>：指定要恢复记录的条件，依次对指定范围内的记录进行操作，若条件为真，对恢复记录，否则不恢复，然后再对下范围内的一个记录进行操作。 While <条件>：指定要恢复的条件，依次对指定范围内的记录进行操作，若条件为真，对恢复记录，若条件为假或已到范围内的最后一个记录则停止。 若省略范围、For <条件>和While <条件>参数，则只恢复当前记录。 若省略范围,但有For <条件>或While <条件>参数，则缺省的范围为整个记录。 In <工作区>|<表别名>：指定要进行恢复的表所在的工作区或表别名，若省略该参数，则是对当前工作区进行操作。 Use C:\学籍管理\学生基本信息表.DBF && 使第5号记录为当前记录 delete && 对第5号记录作删除标记录 && 使第5号记录为当前记录 delete && 对第7号记录作删除标记录 recall && 恢复第7号记录 recall all && 恢复所有记录 3．2．4 修改记录 对表记录的修改有两种方式：屏幕编辑方式和和程序方式 1. 屏幕编辑方式 l EDIT/CHANGE命令 命令格式：EDIT/CHANGE [FIELDS <字段名列表>][<范围>] [FOR 条件] [WHILE条件] 命令参数： FIELDS <字段名列表>：指定哪些字段可以被修改。 <范围>：参见DELETE命令说明。 For <条件>或While <条件>：指定要修改记录的条件，符合条件的记录才会在编辑窗口中显示并修改。 说明：EDIT和CHANGE的功能是完全相同的。
39
1. 逻辑删除 命令格式：Delete [<范围>] [For <条件>] [While <条件>] [In <工作区>|<表别名>] 命令功能：对符合条件的记录进行逻辑删除。 命令参数： <范围>： 指定要操作的记录范围，该参数可以是： All：所有记录。 Next n：从当前记录开始的后面n个记录。 Record n：第n号记录。 Rest：从当前记录开始一直到文件结束。
![1. 逻辑删除 命令格式：Delete [<范围>] [For <条件>] [While <条件>] [In <工作区>|<表别名>] 命令功能：对符合条件的记录进行逻辑删除。 命令参数： <范围>： 指定要操作的记录范围，该参数可以是：](http://slidesplayer.com/slide/16971329/97/images/39/1.+%E9%80%BB%E8%BE%91%E5%88%A0%E9%99%A4+%E5%91%BD%E4%BB%A4%E6%A0%BC%E5%BC%8F%EF%BC%9ADelete+%5B%3C%E8%8C%83%E5%9B%B4%3E%5D+%5BFor+%3C%E6%9D%A1%E4%BB%B6%3E%5D+%5BWhile+%3C%E6%9D%A1%E4%BB%B6%3E%5D+%5BIn+%3C%E5%B7%A5%E4%BD%9C%E5%8C%BA%3E%7C%3C%E8%A1%A8%E5%88%AB%E5%90%8D%3E%5D+%E5%91%BD%E4%BB%A4%E5%8A%9F%E8%83%BD%EF%BC%9A%E5%AF%B9%E7%AC%A6%E5%90%88%E6%9D%A1%E4%BB%B6%E7%9A%84%E8%AE%B0%E5%BD%95%E8%BF%9B%E8%A1%8C%E9%80%BB%E8%BE%91%E5%88%A0%E9%99%A4%E3%80%82+%E5%91%BD%E4%BB%A4%E5%8F%82%E6%95%B0%EF%BC%9A+%3C%E8%8C%83%E5%9B%B4%3E%EF%BC%9A+%E6%8C%87%E5%AE%9A%E8%A6%81%E6%93%8D%E4%BD%9C%E7%9A%84%E8%AE%B0%E5%BD%95%E8%8C%83%E5%9B%B4%EF%BC%8C%E8%AF%A5%E5%8F%82%E6%95%B0%E5%8F%AF%E4%BB%A5%E6%98%AF%EF%BC%9A.jpg "All：所有记录。 Next n：从当前记录开始的后面n个记录。 Record n：第n号记录。 Rest：从当前记录开始一直到文件结束。")
40
For <条件>：指定要作删除标记的条件，依次对指定范围内的记录进行操作，若条件为真，对记录作删除标记，否则不作删除标记，然后再对下范围内的一个记录进行操作。
While <条件>：指定要作删除标记的条件，依次对指定范围内的记录进行操作，若条件为真，对记录作删除标记，若条件为假或已到范围内的最后一个记录则停止。 若省略范围、For <条件>和While <条件>参数，则只删除当前记录。 若省略范围，但有For <条件>或While <条件>参数，则缺省的范围为整个记录。
41
In <工作区>|<表别名>：指定要进行逻辑删除的表所在的工作区或表别名，若省略该参数，则是对当前工作区进行操作。
例如，假设当前表为前面的学生基本信息表，执行如下操作： Delete record && 给第5条记录加删除标记 Go && 给第7条记录成为当前记录 Delete && 给当前记录加删除标记 Delete for 学号=’ ’ &&给学号为 加删除标记。
42
List &&列表显示记录 记录号 学号 姓名 性别 出生日期 身高 简历 1 * 刘军 T /04/ memo 张平 T /13/ Memo 3 * 刘军 T /04/ memo 张平 T /13/ Memo 5 * 李光辉 T /14/ memo 张勇 T /17/ Memo 7 * 罗丽 F /04/ memo 欧阳德雷 T /18/ Memo
43
2. 物理删除 命令格式：Pack 命令功能：将作了删除标记的记录从表中彻底删除，释放其所占的内存空间。 说明：要执行该命令，必须以独占方式打开表。 例如： Use C:\学籍管理\学生基本信息表.DBF exclusive Delete for 姓名=’李勇’ Pack Use
44
4. 记录的恢复 命令格式：RECALL [<范围>] [FOR <条件>] [WHILE <条件>] 命令功能：取消已打删除标记记录的删除标记。 命令参数： <范围>： 参见DELETE的命令参数说明。 For <条件>：指定要恢复记录的条件，依次对指定范围内的记录进行操作，若条件为真，对恢复记录，否则不恢复，然后再对下范围内的一个记录进行操作。 While <条件>：指定要恢复的条件，依次对指定范围内的记录进行操作，若条件为真，对恢复记录，若条件为假或已到范围内的最后一个记录则停止。
![4. 记录的恢复 命令格式：RECALL [<范围>] [FOR <条件>] [WHILE <条件>] 命令功能：取消已打删除标记记录的删除标记。 命令参数： <范围>： 参见DELETE的命令参数说明。](http://slidesplayer.com/slide/16971329/97/images/44/4.+%E8%AE%B0%E5%BD%95%E7%9A%84%E6%81%A2%E5%A4%8D+%E5%91%BD%E4%BB%A4%E6%A0%BC%E5%BC%8F%EF%BC%9ARECALL+%5B%3C%E8%8C%83%E5%9B%B4%3E%5D+%5BFOR+%3C%E6%9D%A1%E4%BB%B6%3E%5D+%5BWHILE+%3C%E6%9D%A1%E4%BB%B6%3E%5D+%E5%91%BD%E4%BB%A4%E5%8A%9F%E8%83%BD%EF%BC%9A%E5%8F%96%E6%B6%88%E5%B7%B2%E6%89%93%E5%88%A0%E9%99%A4%E6%A0%87%E8%AE%B0%E8%AE%B0%E5%BD%95%E7%9A%84%E5%88%A0%E9%99%A4%E6%A0%87%E8%AE%B0%E3%80%82+%E5%91%BD%E4%BB%A4%E5%8F%82%E6%95%B0%EF%BC%9A+%3C%E8%8C%83%E5%9B%B4%3E%EF%BC%9A+%E5%8F%82%E8%A7%81DELETE%E7%9A%84%E5%91%BD%E4%BB%A4%E5%8F%82%E6%95%B0%E8%AF%B4%E6%98%8E%E3%80%82.jpg "For <条件>：指定要恢复记录的条件，依次对指定范围内的记录进行操作，若条件为真，对恢复记录，否则不恢复，然后再对下范围内的一个记录进行操作。 While <条件>：指定要恢复的条件，依次对指定范围内的记录进行操作，若条件为真，对恢复记录，若条件为假或已到范围内的最后一个记录则停止。")
45
若省略范围、For <条件>和While <条件>参数，则只恢复当前记录。
In <工作区>|<表别名>：指定要进行恢复的表所在的工作区或表别名，若省略该参数，则是对当前工作区进行操作。 例如： Use C:\学籍管理\学生基本信息表.DBF && 使第5号记录为当前记录 delete && 对第5号记录作删除标记录
46
&& 使第5号记录为当前记录 delete && 对第7号记录作删除标记录 recall && 恢复第7号记录 recall all && 恢复所有记录 3．2．4 修改记录 对表记录的修改有两种方式：屏幕编辑方式和和程序方式 1. 屏幕编辑方式 l EDIT/CHANGE命令 命令格式：EDIT/CHANGE [FIELDS <字段名列表>][<范围>][FOR 条件][WHILE条件]
47
命令参数： FIELDS <字段名列表>：指定哪些字段可以被修改。 <范围>：参见DELETE命令说明。 For <条件>或While <条件>：指定要修改记录的条件，符合条件的记录才会在编辑窗口中显示并修改。 说明：EDIT和CHANGE的功能是完全相同的。 3．2．5 查询记录 把数据放在数据表中，是为了将来在需要时对其进行查询，查询操作是数据库操作中最常用的。 1. 用Browse命令进行浏览查询
48
命令格式： Browse [Scope] [Fileds <FieldList>] [for <条件表达式>] 功能：显示数据表中的记录。 参数说明： Scope：指定记录范围，该参数的取值可以是：All（所有记录）、Next n（当前记录及其之后的n个记录）、Record n（指定第n条记录）和Rest（当前记录及其之后的所有记录）。若省略该参数，缺省值为All。 Fields <FieldList>：指定要查询显示的字段名列表，若省该参数，则显示所有字段。 for <条件表达式>：指定要查询显示的记录应满足的条件。
![命令格式： Browse [Scope] [Fileds <FieldList>] [for <条件表达式>] 功能：显示数据表中的记录。 参数说明：](http://slidesplayer.com/slide/16971329/97/images/48/%E5%91%BD%E4%BB%A4%E6%A0%BC%E5%BC%8F%EF%BC%9A+Browse+%5BScope%5D+%5BFileds+%3CFieldList%3E%5D+%5Bfor+%3C%E6%9D%A1%E4%BB%B6%E8%A1%A8%E8%BE%BE%E5%BC%8F%3E%5D+%E5%8A%9F%E8%83%BD%EF%BC%9A%E6%98%BE%E7%A4%BA%E6%95%B0%E6%8D%AE%E8%A1%A8%E4%B8%AD%E7%9A%84%E8%AE%B0%E5%BD%95%E3%80%82+%E5%8F%82%E6%95%B0%E8%AF%B4%E6%98%8E%EF%BC%9A.jpg "Scope：指定记录范围，该参数的取值可以是：All（所有记录）、Next n（当前记录及其之后的n个记录）、Record n（指定第n条记录）和Rest（当前记录及其之后的所有记录）。若省略该参数，缺省值为All。 Fields <FieldList>：指定要查询显示的字段名列表，若省该参数，则显示所有字段。 for <条件表达式>：指定要查询显示的记录应满足的条件。")
49
例如： Set century on && 设置日期要显示世纪 Set date ansi && 设置日期显示格式为yyyy.mm.dd Open database c:\学籍管理\学生学籍库.DBC Use 学生基本信息 Browse for 出生日期>{^ } Close 上面的程序运行过程中将打开一个查询窗口(如图3-14所示)，可在其中浏览查询到的记录。
50
图 3-14 数据浏览查询窗口
51
2. 用Locate命令进行查询 命令格式： Locate [Scope][for <条件表达式>] 功能：将记录指针定位到指定记录范围内满足条件的第一条记录，若没有记录满足条件，记录移到记录末尾，Eof()函数返回“真”。 参数说明： Scope：指定记录范围，该参数的取值可以是：All（所有记录）、Next n（当前记录及其之后的n个记录）、Record n（指定第n条记录）和Rest（当前记录及其之后的所有记录）。若省略该参数，缺省值为All。 for <条件表达式>：指定要查找的记录应满足的条件。
![2. 用Locate命令进行查询 命令格式： Locate [Scope][for <条件表达式>] 功能：将记录指针定位到指定记录范围内满足条件的第一条记录，若没有记录满足条件，记录移到记录末尾，Eof()函数返回 真 。](http://slidesplayer.com/slide/16971329/97/images/51/2.+%E7%94%A8Locate%E5%91%BD%E4%BB%A4%E8%BF%9B%E8%A1%8C%E6%9F%A5%E8%AF%A2+%E5%91%BD%E4%BB%A4%E6%A0%BC%E5%BC%8F%EF%BC%9A+Locate+%5BScope%5D%5Bfor+%3C%E6%9D%A1%E4%BB%B6%E8%A1%A8%E8%BE%BE%E5%BC%8F%3E%5D+%E5%8A%9F%E8%83%BD%EF%BC%9A%E5%B0%86%E8%AE%B0%E5%BD%95%E6%8C%87%E9%92%88%E5%AE%9A%E4%BD%8D%E5%88%B0%E6%8C%87%E5%AE%9A%E8%AE%B0%E5%BD%95%E8%8C%83%E5%9B%B4%E5%86%85%E6%BB%A1%E8%B6%B3%E6%9D%A1%E4%BB%B6%E7%9A%84%E7%AC%AC%E4%B8%80%E6%9D%A1%E8%AE%B0%E5%BD%95%EF%BC%8C%E8%8B%A5%E6%B2%A1%E6%9C%89%E8%AE%B0%E5%BD%95%E6%BB%A1%E8%B6%B3%E6%9D%A1%E4%BB%B6%EF%BC%8C%E8%AE%B0%E5%BD%95%E7%A7%BB%E5%88%B0%E8%AE%B0%E5%BD%95%E6%9C%AB%E5%B0%BE%EF%BC%8CEof%28%29%E5%87%BD%E6%95%B0%E8%BF%94%E5%9B%9E+%E7%9C%9F+%E3%80%82.jpg "参数说明： Scope：指定记录范围，该参数的取值可以是：All（所有记录）、Next n（当前记录及其之后的n个记录）、Record n（指定第n条记录）和Rest（当前记录及其之后的所有记录）。若省略该参数，缺省值为All。 for <条件表达式>：指定要查找的记录应满足的条件。")
52
3. 用Continue命令进行查询 命令格式： Continue 功能：激活Locate命令，继续顺查找。 例如： Set century on && 设置日期要显示世纪 Set date ansi && 设置日期显示格式为yyyy.mm.dd Open database c:\学籍管理\学生学籍库.DBC Use 学生基本信息 Locate for 出生日期={^ }
53
Do while .T. If Eof()=.T. ?’没有满足条件的记录!’ exit else ?学号,姓名,性别,出生日期 Continue &&查找下一个出生日期为 的记录 Endif Enddo Close all
54
3．2．6 从表向数组传递数据 在Visual FoxPro中对数组大小没有什么限制，主要取决于磁盘和内存空间的大小，数组存在于内存，运行处理速度很快。 当前记录传到数组中/数组中的数据送当前记录： 有关命令： 1. Scatter命令 命令格式： Scatter [Fields <字段名列表>] [Memo] TO <数组名> 功能：将当前表的当前复制到数组中。
55
参数说明： <字段名列表>：指定要复制到数组的字段，若省略该参数，则将所有字段复制到数组中（对于备注型字段需要Memo参数）。 Memo：指定复制备注型字段，若省略该参数，则不复制备注型字段到数组。 <数组名>：指定记录要复制到的数组。 说明：若要复制的字段个数大于数组的大小，系统会自动将数组的大小扩大，若数组未定义，系统会自动创建数组。
56
2. Gather命令 命令格式： Gather From <数组名> [Fields <字段名列表>] [Memo] 功能：将数组中的数据复制到当前表的当前记录中。 参数说明： <数组名>：指定要复制数据的数组。 <字段名列表>：指定要接收数据的字段，若省略该参数，则将对所有字段进行操作（对于备注型字段需要Memo参数）。
![2. Gather命令 命令格式： Gather From <数组名> [Fields <字段名列表>] [Memo] 功能：将数组中的数据复制到当前表的当前记录中。 参数说明：](http://slidesplayer.com/slide/16971329/97/images/56/2.+Gather%E5%91%BD%E4%BB%A4+%E5%91%BD%E4%BB%A4%E6%A0%BC%E5%BC%8F%EF%BC%9A+Gather+From+%3C%E6%95%B0%E7%BB%84%E5%90%8D%3E+%5BFields+%3C%E5%AD%97%E6%AE%B5%E5%90%8D%E5%88%97%E8%A1%A8%3E%5D+%5BMemo%5D+%E5%8A%9F%E8%83%BD%EF%BC%9A%E5%B0%86%E6%95%B0%E7%BB%84%E4%B8%AD%E7%9A%84%E6%95%B0%E6%8D%AE%E5%A4%8D%E5%88%B6%E5%88%B0%E5%BD%93%E5%89%8D%E8%A1%A8%E7%9A%84%E5%BD%93%E5%89%8D%E8%AE%B0%E5%BD%95%E4%B8%AD%E3%80%82+%E5%8F%82%E6%95%B0%E8%AF%B4%E6%98%8E%EF%BC%9A.jpg "<数组名>：指定要复制数据的数组。 <字段名列表>：指定要接收数据的字段，若省略该参数，则将对所有字段进行操作（对于备注型字段需要Memo参数）。")
57
3．2．7 使用SQL语言对表进行操作 结构化查询语言SQL（Structured Query Language）是目前关系型数据库中应用最广泛的语言之一，美国国家标准协会（ANSI）早在1982年就开始着手SQL的标准化工作，并公布了SQL标准，目前SQL已成为关系型数据库语言的国际标准。 SQL语言具有如下特点： l 综合统一。SQL语言集数据操纵语言（DML）、数据语言（DDL）和数据控制语言的功能于一体，能独立完成数据库的全部活动。 l 高度非过程化。用SQL语言对数据进行操作时，用户只需提出“做什么”，而不需要指出“怎么做”，也不需要指出存取路径，存取路径和操作过程都由系统自动完成。
58
l 面向集合的操作方式。SQL语言的操作对象、查询结果都可以是元组的集合。
SQL语言即是自主型语言，又是嵌入式语言。当作为自主型语言使用时，用户通过联机方式直接在终端上键入SQL命令对数据库进行操作；SQL作为嵌入式语言可嵌入到其它高级语言中使用，例如C语言、Visual FoxPro等。 值得注意的是，实际系统中实施的SQL语言与标准SQL语言是有一定差异的，大部分的实际系统并没有完全支持标准的SQL，但在某些方面还对标准SQL语言进行了扩充。 1. SELECT-SQL数据查询命令
59
命令格式： Select <表达式1> [as 别名1],<表达式2> [as 别名2],…,<表达式n> [as 别名n] From <表1>,<表2>,…,<表m> [Into <输出目标>] [Where <条件表达式>] [group by <分组条件>] [having <条件表达式>] [order by <排序方式>]
![命令格式： Select <表达式1> [as 别名1],<表达式2> [as 别名2],…,<表达式n> [as 别名n] From <表1>,<表2>,…,<表m> [Into <输出目标>]](http://slidesplayer.com/slide/16971329/97/images/59/%E5%91%BD%E4%BB%A4%E6%A0%BC%E5%BC%8F%EF%BC%9A+Select+%3C%E8%A1%A8%E8%BE%BE%E5%BC%8F1%3E+%5Bas+%E5%88%AB%E5%90%8D1%5D%2C%3C%E8%A1%A8%E8%BE%BE%E5%BC%8F2%3E+%5Bas+%E5%88%AB%E5%90%8D2%5D%2C%E2%80%A6%2C%3C%E8%A1%A8%E8%BE%BE%E5%BC%8Fn%3E+%5Bas+%E5%88%AB%E5%90%8Dn%5D+From+%3C%E8%A1%A81%3E%2C%3C%E8%A1%A82%3E%2C%E2%80%A6%2C%3C%E8%A1%A8m%3E+%5BInto+%3C%E8%BE%93%E5%87%BA%E7%9B%AE%E6%A0%87%3E%5D.jpg "[Where <条件表达式>] [group by <分组条件>] [having <条件表达式>] [order by <排序方式>]")
60
参数说明： from：指定要查找的数据来自哪些表或视图。 Into：指出查询结果输出到哪里，若省该参数，屏幕上会出现查询窗口显示查询结果。 Where：指定查询条件，若省略该参数，则对所有的记录进行操作。 Group by：指定如何对查询结果进行分组，若省略该参数，则不对查询结果不进行分组。 Having：指定分组应满足的条件，与group by一起使用。 Order by：指定查询结果的排序方式，若省略该参数，则不对查询结果进行分组。
61
SELECT-SQL命令有多个子句，下面通过一些示例来说明其一般用法：
示例一： Select * from 学生基本信息表 查询“学生基本信息”表中所有字段(“*”号表示所有字段)和所有记录，如果表“学生基本信息表”没有打开，系统会自动打开，但命令执行完后表仍处于打开状态，查询结果如图3-16所示。
62
图3-16 Select使用示例一
63
示例二： Select 学号 As 学生学号, 姓名 As 学生姓名, ; 性别, 出生日期 ; From C:\学籍管理\学生基本信息表.DBF ; Where 性别=.t. “Where”指定查询条件，“As”指定列标题，如果不指定列标题，则用字段名作列标题。示例二的查询结果如图3-17所示。
64
图3-17 Select使用示例二
65
示例三： Select 学号, 姓名, iif(性别,’男’,’女’) As 性别, ; 2002-year(出生日期) As 年龄 ; From C:\学籍管理\学生基本信息表.DBF ; order by 学号 在Select命令中可以使用函数和表达式，查询结果按学号顺序排列。示例三的查询结果如图3-18所示。
66
图3-18 Select使用示例三
67
示例四： Select 学号, 姓名; Into array array1; From C:\学籍管理\学生基本信息表.DBF ； Where 出生日期>={^ } list memory like array* && 显示内存变量 Select命令的查询结果输出到数组array1中，示例四的运行后的结果如图3-19所示。
68
图3-19 Select使用示例四
69
示例五： Select 学号, 姓名,max(出生日期) as 最大年龄; from C:\学籍管理\学生基本信息表.DBF 查询表中年龄最大的记录，运行结果如图3-20。
70
图3-20 Select使用示例五
71
2. INSERT-SQL数据插入命令 命令格式： Insert Into <表名> [(字段名1,字段名2,…,字段名n)] Values (表达式1 [,表达式2, [...,[表达式n]]]) 或 Insert Into <表名> [(字段名1,字段名2,…,字段名n)] From Array <数组名> 参数说明： Into <表名>：指定数据要插到哪一张表中。 (字段名1,字段名2,…,字段名n)：指定要插入哪些字段内容，若省略该参数，则是要插入所有字段的值。
![2. INSERT-SQL数据插入命令 命令格式： Insert Into <表名> [(字段名1,字段名2,…,字段名n)] Values (表达式1 [,表达式2, [...,[表达式n]]])](http://slidesplayer.com/slide/16971329/97/images/71/2.+INSERT-SQL%E6%95%B0%E6%8D%AE%E6%8F%92%E5%85%A5%E5%91%BD%E4%BB%A4+%E5%91%BD%E4%BB%A4%E6%A0%BC%E5%BC%8F%EF%BC%9A+Insert+Into+%3C%E8%A1%A8%E5%90%8D%3E+%5B%28%E5%AD%97%E6%AE%B5%E5%90%8D1%2C%E5%AD%97%E6%AE%B5%E5%90%8D2%2C%E2%80%A6%2C%E5%AD%97%E6%AE%B5%E5%90%8Dn%29%5D+Values+%28%E8%A1%A8%E8%BE%BE%E5%BC%8F1+%5B%2C%E8%A1%A8%E8%BE%BE%E5%BC%8F2%2C+%5B...%2C%5B%E8%A1%A8%E8%BE%BE%E5%BC%8Fn%5D%5D%5D%29.jpg "或. Insert Into <表名> [(字段名1,字段名2,…,字段名n)] From Array <数组名> 参数说明： Into <表名>：指定数据要插到哪一张表中。 (字段名1,字段名2,…,字段名n)：指定要插入哪些字段内容，若省略该参数，则是要插入所有字段的值。")
72
From Array <数组名>：将指定数组的内容插到表中。
下面通过示例来说明Insert-SQL命令的用法。 示例一： Use C:\学籍管理\学生基本信息表.dbf insert into 学生基本信息表(学号，姓名) ; values(‘ ’,’罗明华’) 执行上述命令后，会在“学生基本信息表”的末尾插入一记录。
73
示例二： Use C:\学籍管理\学生基本信息表.dbf Dimension array1(2) Array1(1)= ‘ ’ Array1(2)= ’张子华’ insert into 学生基本信息表(学号,姓名) from array array1 执行上述命令后，会在“学生基本信息表”的末尾插入一记录。
74
3.3 表的统计 对于数据库的操作来说，各种统计是经常要遇到的，Visual FoxPro为用户提供了功能强大的各种数据统计命令和函数方便用户编程。 3．3．1 记录统计 记录的统计就是统计表中的记录数有多少。 1. Count记录数统计命令 命令格式： Count [Scope] [For <条件表达式>] [To <变量名>]
75
参数说明： Scope：指定记录范围，该参数的取值可以是：All（所有记录）、Next n（当前记录及其之后的n个记录）、Record n（指定第n条记录）和Rest（当前记录及其之后的所有记录）。若省略该参数，缺省值为All。 For <条件表达式>：指定要查找的记录应满足的条件，若省略该参数，则是对指定记录范围内的所有记录进行统计。 To <变量名>：指定统计结果存放的变量，若省略该参数，统计结果显示在屏幕上。 注意：对于该命令，若Set delete被设置为Off，则统计的记录数包括被作了删除标记的记录；若Set delete被设置为On，则统计的记录数不包括被作了删除标记的记录。
76
例如： Set talk off Set delete off Use C:\学籍管理\学生基本信息表.dbf browse count to var1 Set delete on count to var2 ?’包括作了删除标记的记录数为：’,var1 ?’不包括作了删除标记的记录数为：’,var2
77
图3-21浏览“学生基本信息表”
78
从图3-21中可以看出有3个记录作了删除标记，关闭图3-21的窗体，程序显示记录的统计结果：
包括作了删除标记的记录数为： 8 不包括作了删除标记的记录数为： 4 3．3．2 累加值和平均值 累加值求某个或多个字段表达式的算术和。 1. Sum记录数统计命令 命令格式： Sum [<字段表达式列表>] [Scope] [For <条件表达式>] [To <内存变量> | To Array <数组名>]
79
参数说明： <字段表达式列表>：指定一个或多个要求累加和的字段表达式，表达式的值必须为数值型，若省略该参数，则是对所有数值字段求和。 Scope：指定记录范围，该参数的取值可以是：All（所有记录）、Next n（当前记录及其之后的n个记录）、Record n（指定第n条记录）和Rest（当前记录及其之后的所有记录）。若省略该参数，缺省值为All。 For <条件表达式>：指定参加求和的记录应满足的条件。 To <内存变量列表>：指定保存累加和结果的变量列表，变量个数应与<字段表达式列表>的个数相同，多个变量名之间用逗号“，”隔开。
80
To Array <数组名>：指定保存累加和结果的数组，若指定的数组不存在，Visual FoxPro会自动创建这个数组，若指定的数组元素不够多，Visual FoxPro会自动扩展数组元素的个数。 若省略“To <内存变量列表>”和“To Array <数组名>”参数，则计算结果直接显示在屏幕上。 例如：计算全班平均身高。 USE c:\学籍管理\学生基本信息表.dbf Sum 身高 to v &&计算全班身高总和 Count to v &&统计全班总人数 ?’全班平均身高：’,v1/v2 &&显示全班平均身高
81
2. Average计算平均值命令 命令格式： Average [<字段表达式列表>] [Scope] [For <条件表达式>] [To <内存变量> | To Array <数组名>] 参数说明： <字段表达式列表>：指定一个或多个要求平均值的字段表达式，表达式的值必须为数值型，若省略该参数，则是对所有数值字段求平均值。 Scope：指定记录范围，该参数的取值可以是：All（所有记录）、Next n（当前记录及其之后的n个记录）、Record n（指定第n条记录）和Rest（当前记录及其之后的所有记录）。若省略该参数，缺省值为All。
![2. Average计算平均值命令 命令格式： Average [<字段表达式列表>] [Scope] [For <条件表达式>] [To <内存变量> | To Array <数组名>] 参数说明：](http://slidesplayer.com/slide/16971329/97/images/81/2.+Average%E8%AE%A1%E7%AE%97%E5%B9%B3%E5%9D%87%E5%80%BC%E5%91%BD%E4%BB%A4+%E5%91%BD%E4%BB%A4%E6%A0%BC%E5%BC%8F%EF%BC%9A+Average+%5B%3C%E5%AD%97%E6%AE%B5%E8%A1%A8%E8%BE%BE%E5%BC%8F%E5%88%97%E8%A1%A8%3E%5D+%5BScope%5D+%5BFor+%3C%E6%9D%A1%E4%BB%B6%E8%A1%A8%E8%BE%BE%E5%BC%8F%3E%5D+%5BTo+%3C%E5%86%85%E5%AD%98%E5%8F%98%E9%87%8F%3E+%7C+To+Array+%3C%E6%95%B0%E7%BB%84%E5%90%8D%3E%5D+%E5%8F%82%E6%95%B0%E8%AF%B4%E6%98%8E%EF%BC%9A.jpg "<字段表达式列表>：指定一个或多个要求平均值的字段表达式，表达式的值必须为数值型，若省略该参数，则是对所有数值字段求平均值。 Scope：指定记录范围，该参数的取值可以是：All（所有记录）、Next n（当前记录及其之后的n个记录）、Record n（指定第n条记录）和Rest（当前记录及其之后的所有记录）。若省略该参数，缺省值为All。")
82
For <条件表达式>：指定参加求平均值的记录应满足的条件。
To <内存变量列表>：指定保存平均值结果的变量列表，变量个数应与<字段表达式列表>的个数相同，多个变量名之间用逗号“，”隔开。 To Array <数组名>：指定保存平均值结果的数组，若指定的数组不存在，Visual FoxPro会自动创建这个数组，若指定的数组元素不够多，Visual FoxPro会自动扩展数组元素的个数。 若省略“To <内存变量列表>”和“To Array <数组名>”参数，则计算结果直接显示在屏幕上。
83
例如：计算全班平均身高。 USE c:\学籍管理\学生基本信息表.dbf Average 身高 to v1 ?’全班平均身高：’,v1
84
3.4 表的索引 表中的记录是按录入的先后顺序排列的，通常是没有规律的，对于这种没有规律排列的记录，对其查找只能按从头至尾的方式进行查询，如果表中有10000个记录，则查询一个记录平均要遍历5000个记录，对于一些记录数较多的表来说，其查询时间可能非常长。 索引是对表中的记录按一定规律排序，从而可大大提高查询速度，索引并不是修改表中记录的排列顺序，而是新建一个索引文件，记录的关键字（即排序字段）在索引文件中按顺序排列。对于一个表可以建立多个索引，每个索引代表一种排列方式（如第1个索引为按学号排列，第2个索引按成绩排序等）
85
注意：当对表中的记录进行了修改、增加或删除操作，Visual FoxPro也会对相应的索引文件进行修改、增加或删除操作，因此对一个表不要建太多的索引，否则Visual FoxPro会在维护索引上耗费相当时间，使程序运行效率降低。 在Visual FoxPro中，索引有三种：结构复合索引（.CDX）、独立复合索引（.CDX）和独立索引（.IDX），用得最多的索引是结构复合索引（.CDX），其特点是： l 打开表时自动打开索引。 l 在同一索引文件中可以有多种排序方式，具有多个索引关键字。 l 在对表进行修改、增加或删除操作时，系统自动维护索引文件。
86
3．4．1 索引的建立 1．结构复合索引的建立 在Visual FoxPro的“项目管理器”中， 选择要建立索引的表（如图3-22所示），然后点击“修改”按钮，屏幕上出现“表设计器”窗口，在“表设计器”中选择“索引”卡（如图3-23所示）。
87
图3-22 选择要建立索引的表
88
图3-23 “表设计器”索引卡
89
在图2-23中的“索引名”输入框中输入索引名，在“类型”处选择索引类型，共有4种索引类型：
l 主索引（Primary Indexs）：要求其对应的索引表达式的值在表中是唯一的，不允许重复，如图3-23中的Sno就是主索引，要求表中每个学生的学号不能相同。数据库中的都可建立一个主索引，也可以没有主索引，自由表不能建立主索引。 l 候选索引（Candidate Indexs）：也是具有唯一值的引索，数据表和自由表都可以建 立候选索引，一个表可以建立多个候选索引。 l 普通索引（Regular Indexs）：允许索引对应的表达式值重复，一个表可建立多个普通索引。
90
l 唯一索引（Unique Indexs）：主要是为了与以前的版本兼容，允许索引对应的表达式的值重复，但在唯一索引中只存储重复值第一次出现的记录，忽略重复值第二次和以后的记录。
在图3-23中，建立索引时还可以指定索引的排序方式：升序（↑）或是降序（↓），要改变索引的排序方式，选中要改变排序方式的索引，然后点击其左边的 即可。 对于一个索引还可以指定其“筛选条件”，要指定筛选条件，点击筛选输入框右连的按钮，屏幕上将会出现筛选“表达式生成器”窗口（如图3-24所示），可在图3-24的表达式输入筛选条件，对索引指定了筛选条件后，则只有符合筛选条件的记录才会在索引文件中出现。
91
图3-24 筛选“表达式生成器”对话框
92
在图3-23中输入完要建立的索引后，按“确定”按钮，屏幕上出现图3-25所示的对话框，在图3-25中，点击“确定”按钮，系统开始检测当前表中记录是否符合索引的设置（针对主索引和候选索引），若屏幕上出现图3-26所示的消息框，则说明当前表中的记录违返了索引唯一性要求，若没有新的窗口出现，则说明索建立成功了。
93
图3-25 表结构修改确认对话框 图3-26 Visual FoxPro消息框
94
当建立索引成功后，用户可以看到在与表相同的目录中会有一个与表同名，但扩展名为.CDX的索引文件。
2．独立索引的建立 命令格式： Index On <索引表达式> To <索引文件名> [Ascending|Descending] [For <条件表达式>][Unique] 参数说明： <索引表达式>：指定索引关键字。 To <索引文件名>：指定索引文件名。
95
Ascending：指定索引按升序排序。
Descending：指定索引按降序排序，若不指定排序方式，缺省是按升序排序。 For <条件表达式>：指定参加索引的记录应满足的条件，不满足条件的记录不会在索引中出现，若省略该参数，缺省是所有的记录。 Unique：指定建立唯一索引，即具有相同引索关键字的记录只有第1条记录出现在索引中。 例如，有一学生成绩表，按课程名称和学号排序。 Use 学生成绩表 exclusive
96
Browse && 按记录在表中的物理顺序浏览表中的记录
Index on 学号 to index1 Browse && 按索引顺序浏览表中的记录 Use &&关闭打开的表 注意：要为表建立索引文件，表必须以独占方式打开。 上面程序运行的结果如图3-27和3-28所示。
97
图3-27 按表中物理顺序显示记录
98
图3-28 按索引顺序显示表中记录
99
3．4．2 索引的使用 要使用索引，必须先打开索引文件，对于结构索引文件，不需要专门打开索引文件，当表打开时，其相应的索引文件就自动打开；对于独立索引文件，需要用专门命令来打开。 1. 打索引文件 l 在打开表时同时打开相应的索引文件 命令格式： Use <表名> index <索引文件名列表> 参数说明： <表名>：指定要打开的表。
100
<索引文件名列表>：指定同时要打开的索引文件，若有多个索引文件，则各个索引文件之间用逗号“，”隔开。
例如： Use 学生成绩 index index1 l 打开索引文件 命令格式： Set Index to <索引文件名列表> 功能：打开索引文件。
101
参数说明： <索引文件名列表>：指定要打开的索引文件，若要打开多个索引文件，索引文件之间用逗号“,”隔开。 说明：打开索引文件之前，必须先打开其对应的表。 当有多个索引文件同时打开时，只能有一个索引可以作为当前索引并起作用，其它索引虽然已打开，但不起作用，要设置当前索引，可用如下命令： Set Order To [<数值表达式>|<索引名>] <数值表达式>：指定索引文件列表中第几个作为当前索引。
102
<索引名>：指定作为当前索引的引索名。
若省略参数<数值表达式>和<索引名>，则是取消当前索引。 例如： Use 学生成绩表 index index1,index2,index3,index4 Set Order to index2 对于复合索引，不需要专门打开索引文件，当打开表时，其对应的索的索引文件也就自动打开了，但索引并不起作用，例如： Use 学生基本信息表 Browse
103
上面程序命令执后，显示结果如图界面3-29所示
图3-29 记录按物理顺序排列显示
104
若要使其按索引顺序显示，可按如下步骤操作： 选择主菜单“表”，然后选择“属性”菜单项。屏幕上出现如图3-30所示的窗口。
图3-30 工作区属性窗口
105
在图3-30中的“索引顺序”选择要使用的索引（如学生基本信息表
在图3-30中的“索引顺序”选择要使用的索引（如学生基本信息表.sno），系统默认的是“无顺序”，选择好后，按“确定”按钮，则屏幕显示如图3-31所示。 图3-31 按“学号”顺序显示记录
106
对于上面的示例，如果要在程序中使用索引，可按如下方式进行：
Use 学生基本信息表 Set order to sno 建立索引文件的目的就是加快对表的查询，与表的索引查询有关的Visual FoxPro命令有2个：Find命令和Seek命令。
107
2. 索引查询 l Find命令 命令格式： Find <表达式> 参数说明： <表达式>：按索引查询的值，该表达式的值只能是常量值，若表达式是非数字字符串常量，在该命令中可以不使用字符定界符；若表达式是内存变量，则必须用宏代换。
108
例如： Use 学生基本信息表 Set order to sno Find ‘ ’ && 在索引上（即学号）查询索引值的 && 前7个字符为“ ”的记录。 Xh=' ' Find Xh && 在索引上（即学号）查询索引值的 && 前2个字符为“Xh”的记录。 Find &Xh && 在索引上（即学号）查询索引值的
109
Find 李平 && 在索引上（即学号）查询索引值的前４
&& 个字符为“李平”的记录。 l Seek命令 命令格式： Seek <表达式> 参数说明： <表达式>：按索引查询的值，该表达式中可以有变量，表达中的字符串常量必须使用字符串定界符。
110
Use 学生基本信息表 Set order to sno Seek ‘ ’ && 在索引上（即学号）查询索引值的 && 前7个字符为“ ”的记录。 Xh=' ' Seek Xh && 在索引上（即学号）查询索引值的 Seek 李平 && 出错，因为没有定义变量“李平”
111
3.5 多表操作 在实际应用中，一次需要操作多个表的情况是很普遍的，利用Visual FoxPro提供的工作区，可同时打开多个表，工作区是Visual FoxPro在内存中开辟的一块区域，Visual FoxPro提供了32767个工作区，其编号从1到32767，因此在Visual FoxPro可同时打开32767个表，一个工作区一次只能打开一个表，若在一个工作区中已经打开了一个表，再打开另一个表，则系统会自动关闭前面已打开的表。 3．5．1 工作区与别名 正在被使用的工作区称为当前工作区，当Visual FoxPro刚启动时，当前工作区是1号工作区，Visual FoxPro的工作区有32767个，编号从1到32767，对于1～10号工作区，
112
Visual FoxPro还为其取了别名，分别是A～J。
要指定当前工作区，可使用Selec命令。 Select命令格式： Select <工作区号|工作区别名>|<表别名> 参数说明： <工作区号|工作区别名>：指定要选择的工作区号（1～32767）或工作区别名（A~J）。 <表别名>：指定表别名所在的工作区为当前工作区。 说明：Select 0表示选择当前未用的最小工作区号作为当前工作区。
113
例如： Select &&选择1号工作区作为当前工作区 USE c:\学籍管理\学生成绩表.dbf Ａlias cj Select E &&选择E工作区（即5号工作区)作为当前 &&工作区 USE c:\学籍管理\学生基本信息表.dbf . Select &&选择3号工作区作为当前工作区 Select cj &&选择表别名“cj”所在的工作区（即1号 &&工作区）作为当前工作区
114
Select 学生基本信息表 &&选择表别名“学生基本信息
&&表”所在的工作区（即5号工 &&作区）作为当前工作区 3．5．2 表的关联 表的关联就是在2个或多个表之间建立某种联系，例如，有如下2个表：三好学生和学生基本信息表。
115
三好学生 三好学生 学号 1 3 … 学号 1 3 … 2 65 姓名 张军 王平 刘丽 李华 性别 男 出生日期 1981.06.23
备注 体优生 班长
116
这2个表之间的联系是：当“三好学生”表中记录指针移动时，“学生基本信息”表的记录指针也相应移动对应的“学号”记录上，表之间的这种联系就称为表间的关联，“三好学生”表称为父表，“学生基本信息”表称为子表。关联可以是临时性的，也可以是永久性的。 1. 建立表间的临时关联 可使用Set Relation To命令来建立表间的临时关联。 命令格式： Set Relation To [<关系表达式1> into <工作区1>｜ <表别名1>［,<关系表达式2> into <工作区2>｜ <表别名2>…］［into <工作区>｜<表别名>］[Additive]
117
参数说明： <关系表达式n>：指定父表与子表之间建立的关系表达式。 <工作区n>｜<表别名n>：指定子表所在的工作区或表别名。 <工作区>｜<表别名>：指定父表所在的工作区或表别名，若省略该数，则以当前工作区的表作为父表。 Additive：指在建立表间新的关联时保留以当前工作区中已存在的关联，若省略该参数，则在建立表间新关联时取消所有已存在的关联。 说明：在使用该命令之前必须先对子表建立索引。
118
例如： Select 1 Use 学生基本信息 Index on 学号 to xh Select 2 Use 三好学生 Set relation to 学号 into a Goto 2 ?学号,A->学号,A->姓名
119
上述程序运行后，显示结果： 王平 说明：字段变量的引用格式为 [<工作区别名>|<表别名>]->字段变量 或 [<工作区别名>|<表别名>]->字段变量 参数说明： <工作区别名>：指定要引用的字段变量所在的工作区别（取值A～J）。 <表别名>：指定要引用的字段变量的表别名。
![上述程序运行后，显示结果： 3 3 王平. 说明：字段变量的引用格式为. [<工作区别名>|<表别名>]->字段变量. 或 [<工作区别名>|<表别名>]->字段变量.](http://slidesplayer.com/slide/16971329/97/images/119/%E4%B8%8A%E8%BF%B0%E7%A8%8B%E5%BA%8F%E8%BF%90%E8%A1%8C%E5%90%8E%EF%BC%8C%E6%98%BE%E7%A4%BA%E7%BB%93%E6%9E%9C%EF%BC%9A+3+3+%E7%8E%8B%E5%B9%B3.+%E8%AF%B4%E6%98%8E%EF%BC%9A%E5%AD%97%E6%AE%B5%E5%8F%98%E9%87%8F%E7%9A%84%E5%BC%95%E7%94%A8%E6%A0%BC%E5%BC%8F%E4%B8%BA.+%5B%3C%E5%B7%A5%E4%BD%9C%E5%8C%BA%E5%88%AB%E5%90%8D%3E%7C%3C%E8%A1%A8%E5%88%AB%E5%90%8D%3E%5D-%3E%E5%AD%97%E6%AE%B5%E5%8F%98%E9%87%8F.+%E6%88%96+%5B%3C%E5%B7%A5%E4%BD%9C%E5%8C%BA%E5%88%AB%E5%90%8D%3E%7C%3C%E8%A1%A8%E5%88%AB%E5%90%8D%3E%5D-%3E%E5%AD%97%E6%AE%B5%E5%8F%98%E9%87%8F..jpg "参数说明： <工作区别名>：指定要引用的字段变量所在的工作区别（取值A～J）。 <表别名>：指定要引用的字段变量的表别名。")
120
若在引用字段变量时未指定<工作区别名>和<表别名>，则缺省为当前工作区的在的表。
用Set Relation to命令建立的表间的关联是临时的，若下一次再打开这些表，它们之间的这种关联就消失了，若还要让它们关联，必须再用Set Relation to命令来建立它们之间的关联。 2. 建立表间的永久关联 可按如下步骤建立表间的永久关联： 在Visual FoxPro集成开发环境中，新建一个数据库，然后在“数据库设计器”中新建（或将表添加到数据库中）表，并为要建立关联的父表建成立一个主索引，为为要建立关联的子表建成立一个索引，如图3-32所示。
121
图3-32 “数据库”设计器窗口
122
在图3-32中选中父表（三好学生表）的主索引（sno），按住鼠标左键不放，将鼠标拖到子表（学生基本信息表）的索引上，然后松开鼠标，此时两表间的关联就建立了（如图3-33所示）
关联线 图3-33建立表间的关联
123
若要修改关联，在图3-33中，先选中“关联线”，然后点击鼠标右键，在出现的快捷菜单中选择“编辑关系”项，屏幕上出现“编辑关系”对话框（如图3-34所示），可在图3-34修改表和相关表的关联关系。
图3-34 “编辑关系”对话框
124
在图3-34中点击“参照完整性”按钮，屏幕上出现“参照完整性生成器”窗口（如图3-35所示），在“参照完整性生成器”窗口中可设置关联表间的更新规则、删除规则和插入规则。
125
图3-35“参照完整性生成器”窗口
Similar presentations
