《Visual+FoxPro程序设计》授课课件3

1、1工程101 102班二O一一年三月2Visual FoxPro使用与开发技术使用与开发技术3一、一、Visual FoxProVisual FoxPro的操作及其命令的操作及其命令Visual FoxPro使用与开发技术使用与开发技术4Visual FoxPro使用与开发技术使用与开发技术在在Visual FoxPro 6.0下创建自由表下创建自由表步骤：步骤：3.向表输入数据向表输入数据1.定义表名（含表所存储的位置）定义表名（含表所存储的位置）2.定义表的字段属性定义表的字段属性（字段名、类型、宽度、是否建立索引）（字段名、类型、宽度、是否建立索引）5Visual FoxPro使用与开发

2、技术使用与开发技术在在Visual FoxPro 6.0下创建自由表下创建自由表利用表设计器创建表利用表设计器创建表方法一方法一: :用菜单方式创建表用菜单方式创建表67Visual FoxPro使用与开发技术使用与开发技术8Visual FoxPro使用与开发技术使用与开发技术910111213141516Visual FoxPro使用与开发技术使用与开发技术在在Visual FoxPro 6.0下创建自由表下创建自由表利用表设计器创建表利用表设计器创建表方法二方法二: :用命令方式创建表用命令方式创建表17在在Visual FoxPro 6.0下创建自由表下创建自由表使用的命令：使用的命令

3、：CREATEVisual FoxPro使用与开发技术使用与开发技术CREATE简易型格式： CREATE 示例： CREATE D:CW09团员名单.dbf18Visual FoxPro使用与开发技术使用与开发技术1920在在Visual FoxPro 6.0下创建自由表下创建自由表CREATE命令完整型格式：Visual FoxPro使用与开发技术使用与开发技术(),(),() CREATE TABLE21Visual FoxPro使用与开发技术使用与开发技术22232425Visual FoxPro使用与开发技术使用与开发技术在在Visual FoxPro 6.0下创建自由表下创建自由表

4、利用表设计器创建表利用表设计器创建表方法三方法三: :在项目管理器中创建表在项目管理器中创建表26选项卡选项卡命令按钮命令按钮列表框列表框认识Visual FoxPro项目管理器 项目管理器项目管理器在在Visual FoxProVisual FoxPro中的地位和作中的地位和作用：用： 项目管理器项目管理器是是Visual FoxProVisual FoxPro各种数据和对各种数据和对象的集中营象的集中营 项目管理器项目管理器是是Visual FoxProVisual FoxPro的的“控制中心控制中心” 项目管理器项目管理器实现实现对各类数据进行对各类数据进行科学的组织和管科学的组织和管理

5、理Visual FoxPro使用与开发技术使用与开发技术采用采用“目录树目录树”结结构对资源信息进行构对资源信息进行集中管理集中管理可根据需求创建、修可根据需求创建、修改、增加、删除和浏改、增加、删除和浏览各种资源文件览各种资源文件建立数据字典，存储建立数据字典，存储各数据表间的关系各数据表间的关系将系统资源编译成可独立运将系统资源编译成可独立运行的行的.APP.APP或或.EXE.EXE文件文件27Visual FoxPro使用与开发技术使用与开发技术在在Visual FoxPro 6.0下创建自由表下创建自由表Visual FoxProVisual FoxPro项目管理器项目管理器项目管理

6、器的创建方法：项目管理器的创建方法：方法一：菜单操作创建方法一：菜单操作创建28293031Visual FoxPro使用与开发技术使用与开发技术在在Visual FoxPro 6.0下创建自由表下创建自由表Visual FoxProVisual FoxPro项目管理器项目管理器项目管理器的创建方法：项目管理器的创建方法：方法二：命令创建方法二：命令创建创建项目管理器文件的命令：创建项目管理器文件的命令：CREATE project CREATE project MODIFY project MODIFY project 32CREATE PROJECT D:CW09企业财务管理系统企业财务管

7、理系统.pjxMODIFY PROJECT D:CW09企业财务管理系统企业财务管理系统.pjx3334Visual FoxPro使用与开发技术使用与开发技术在在Visual FoxPro 6.0下创建自由表下创建自由表利用表设计器创建表利用表设计器创建表在项目管理器中创建在项目管理器中创建“自由表自由表”353637Visual FoxPro使用与开发技术使用与开发技术在在Visual FoxPro 6.0下创建自由表下创建自由表利用利用“表向导表向导”创建表创建表自学内容自学内容: :由学生自学本节内容由学生自学本节内容38Visual FoxPro使用与开发技术使用与开发技术Visual

8、 FoxPro 实战操作篇学习情况检查实战操作篇学习情况检查（一）（一）1.1.创建一个自由表，使它能记录本班同学的基创建一个自由表，使它能记录本班同学的基本信息。本信息。2.2.创建一个自由表，使它能记录本班同学截止目创建一个自由表，使它能记录本班同学截止目前为止的课程成绩。前为止的课程成绩。3.3.创建一个自由表，使它能记录本专业已开设的创建一个自由表，使它能记录本专业已开设的课程及其任课老师。课程及其任课老师。4.4.利用利用“表向导表向导”创建一个自由表，以以上设计创建一个自由表，以以上设计的第一个自由表为的第一个自由表为“样表样表”，截取其中至少，截取其中至少5 5个字段作为新表的字

9、段，并适当修改字段长度。个字段作为新表的字段，并适当修改字段长度。39在在Visual FoxPro 6.0下打开自由表下打开自由表命令操作方式命令操作方式菜单操作方式菜单操作方式格式：USE 文件文件/打开打开/“表表”类型类型选选表文件原保存的位置表文件原保存的位置Visual FoxPro使用与开发技术使用与开发技术40在在VFP下显示已打开自由表的内容下显示已打开自由表的内容命令操作方式命令操作方式格式：LIST | DISPLAY1.1.只显示表的一部分记录或某一条记录只显示表的一部分记录或某一条记录？2.2.在显示时按要求只显示满足条件的记录在显示时按要求只显示满足条件的记录？3.

10、3.在显示时只把我所关心的字段内容显示在显示时只把我所关心的字段内容显示？ Visual FoxPro使用与开发技术使用与开发技术41学号学号姓名姓名性别性别出生日期出生日期籍贯籍贯班委否班委否班委职务班委职务联系方式联系方式陆艳芳陆艳芳女女11/08/198111/08/1981湖南湖南F F张雨辰张雨辰男男12/09/198212/09/1982河北河北t t班长班长吴越录吴越录男男01/07/198301/07/1983陕西陕西f徐永康徐永康男男02/10/198402/10/1984广西广西t t组织委员组织委员 王洁琼王洁琼女女03/11/198503/11/1985天津天津t t宣

11、传委员宣传委员 杨凤婷杨凤婷女女04/12/198604/12/1986云南云南t t团支部书记团支部书记 张松林张松林男男05/13/198705/13/1987安徽安徽f f 万晓莉万晓莉女女06/14/198806/14/1988广东广东f f 闭忠梦闭忠梦男男07/15/198907/15/1989浙江浙江f f 覃武明覃武明男男08/06/198808/06/1988辽宁辽宁t t纪律委员纪律委员 Visual FoxPro使用与开发技术使用与开发技术42 VFPVFP完整的命令格式完整的命令格式1.命令以命令动词开头，且命令动词可缺省写为前4个字母2.命令与子句，子句与子句，子句的

12、各部分间须至少以一个空格隔开；且各子句的书写顺序任意 命命令参数令参数 其他附带动作其他附带动作 Visual FoxPro使用与开发技术使用与开发技术43LIST|DISPLAY FIELDS FOR WHILE OFF TO PRINT |TO FILE 第一条完整的第一条完整的VFP命令（最能代表性命令（最能代表性VFP的命令格式）的命令格式）范围子句范围子句 ： ALL 所有记录所有记录NEXT 从当前记录起的从当前记录起的N个记录个记录 RECORD 第第N个记录个记录REST 从当前记录起到最后一个记录止的所有记录从当前记录起到最后一个记录止的所有记录再回首再回首LIST|DISP

13、LAY LIST|DISPLAY 命令：命令：Visual FoxPro使用与开发技术使用与开发技术44注意：注意：FOR子句与WHILE子句均指明进行操作的记录的条件。其区别在于： 1.范围缺省时，FOR子句默认为ALL；WHILE子句则只从当前记录开始按条件筛选 2.当发现一个记录不满足条件时，FOR子句跳过该记录继续检查下去；WHILE子句则只操作到这个不满足条件的记录为止。 说明说明:LIST与DISPLAY的区别 范围与条件缺省时，LIST默认为ALL，DISPLAY为当前记录 LIST为滚动方式输出，DISPLAY为分屏输出Visual FoxPro使用与开发技术使用与开发技术45

14、l立即输入：创建完表结构后，在输入立即输入：创建完表结构后，在输入数据记录对话框中选择数据记录对话框中选择“是是”,如下图如下图示示l建好结构之后的输入：建好结构之后的输入：l菜单：打开表，选择菜单：打开表，选择“显示显示/浏览浏览”，选择选择“显示显示/追加方式追加方式”l命令：命令：APPEND选择“是”,立即输入记录再说记录的输入Visual FoxPro使用与开发技术使用与开发技术46再说记录的输入再说记录的输入l逻辑型字段宽度为1，只接受T,Y,F,N这4个字母之一（大小写均可）l日期型数据必须与系统日期格式相符 SET DATE MDY可将系统日期格式转换为美国日期格式mm/dd/

15、yyl备注型与通用型字段的输入与编辑l备注型与通用型字段中已填有备注型与通用型字段中已填有memomemo和和gengen等内容，等待输入有关数据。操作等内容，等待输入有关数据。操作如下：如下：Visual FoxPro使用与开发技术使用与开发技术47（1 1）把光标）把光标定位于定位于“memo”memo”或或“gen”gen”。（2 2）按）按Ctrl+PgDnCtrl+PgDn，Ctrl+PgUpCtrl+PgUp或或Ctrl+HomeCtrl+Home等组合键等组合键之一之一或双击或双击鼠标，出现鼠标，出现“memo”memo”或或“gen”gen”编辑窗编辑窗口。口。（3 3）输入或

16、编辑输入或编辑数据后，按数据后，按Ctrl+WCtrl+W或单击关闭或单击关闭按钮，按钮，以储存数据和返回数据输入窗口；如果按以储存数据和返回数据输入窗口；如果按Ctrl+QCtrl+Q或或EscEsc键则放弃键则放弃当前所输入的信息而返回。当前所输入的信息而返回。（4 4）在备注型或通用型字段数据输入后，该记录的）在备注型或通用型字段数据输入后，该记录的“memo”memo”或或“gen”gen”中的第一个字母被改写成大写，中的第一个字母被改写成大写，变为变为“Memo”Memo”或或“Gen”Gen”。l备注型与通用型字段值存储在与表文件同名，但扩展名为.FPT的备注文件中。Visual

17、FoxPro使用与开发技术使用与开发技术484关闭工作表的命令关闭工作表的命令 use close all clear all5复制并创建新的数据表文件命令复制并创建新的数据表文件命令格式：格式：copy to 范围范围 for/while fields 字段名表字段名表功能：将当前打开表的全部或部分复制到一个功能：将当前打开表的全部或部分复制到一个 新表中。新表中。举例：举例：copy to F:FC091考勤表考勤表2.dbfVisual FoxPro使用与开发技术使用与开发技术496复制表结构并创建新表的命令复制表结构并创建新表的命令 格式：格式：copy structure to 功能

18、：将一个已打开的表的全部或部分结构功能：将一个已打开的表的全部或部分结构 （即字段名）复制成一个新的表。（即字段名）复制成一个新的表。举例：举例：copy strucutre to F: FC091考勤表考勤表3.dbf7表结构的显示表结构的显示格式：格式：list |display structure功能：显示当前表结构的有关信息。功能：显示当前表结构的有关信息。举例：举例：list stru8表结构的修改表结构的修改格式：格式：modify structure功能：显示表设计器，修改当前表文件的结构。功能：显示表设计器，修改当前表文件的结构。举例：举例：modi struVisual Fo

19、xPro使用与开发技术使用与开发技术50表记录的操作命令表记录的操作命令1记录的编辑修改命令：记录的编辑修改命令：edit、change、 browse格式：格式：edit for|while fieldschan for|whilefieldsbrow fields for|while功能：均为全屏幕编辑命令，用于显示和编辑表中记功能：均为全屏幕编辑命令，用于显示和编辑表中记录。录。举例：举例：edit for 授课班级授课班级=”04信息信息-2 fiel 编号编号,姓名姓名,性别性别,年龄，籍贯年龄，籍贯 chan for 性别性别=女女 fiel 姓名姓名,文化程度文化程度,专业代号专

20、业代号 brow fiel ysf,yf,skrq,bzVisual FoxPro使用与开发技术使用与开发技术512更新指定记录的命令：更新指定记录的命令：replace 格式：格式：replace fiel for 字字段名段名 with 功能：可用一个统一的表达式一次修改一批数据。功能：可用一个统一的表达式一次修改一批数据。举例：举例：repl rest 月收入月收入 with 月收入月收入*（1+0.15） for 工龄工龄=203查找表中指定记录的命令查找表中指定记录的命令:locate格式：格式：locate for|while 功能：在指定范围内将记录指针移到满足条件的功能：在指定

21、范围内将记录指针移到满足条件的第一条记录上。如果继续查找，在命令窗口键第一条记录上。如果继续查找，在命令窗口键入入continue。举例：举例：locate for 职称职称=”教授教授” contiueVisual FoxPro使用与开发技术使用与开发技术524移动记录指针命令：移动记录指针命令：goto、skip（1）绝对移动命令：）绝对移动命令：格式：格式：goto /bottom/top功能：将记录指针不附带任何条件地移动到指功能：将记录指针不附带任何条件地移动到指定到记录号上。定到记录号上。 说明：写说明：写go和和goto是等效的。数值表达式值的是等效的。数值表达式值的整数部分应当

22、大于或等于整数部分应当大于或等于1且小于或等于当前库且小于或等于当前库文件中的记录总数。当正数值表达式是常数时，文件中的记录总数。当正数值表达式是常数时，go或或goto可略去不写，尽管在编程时并不提倡可略去不写，尽管在编程时并不提倡这一省略。这一省略。 举例：举例：goto 20 (或或go 20) goto bottom goto topVisual FoxPro使用与开发技术使用与开发技术53（2）相对移动命令：）相对移动命令：格式：格式：skip数值表达式数值表达式功能：相对移动记录指针是指相对功能：相对移动记录指针是指相对当前记录位置移动记录指针。当前记录位置移动记录指针。说明：数值

23、表达式的值可以是正数、说明：数值表达式的值可以是正数、负数或零。设表达式值的整数部分负数或零。设表达式值的整数部分为为n，则相对当前记录位置将记录，则相对当前记录位置将记录指针向前或向后移动指针向前或向后移动n个记录。个记录。Visual FoxPro使用与开发技术使用与开发技术54具体地说是：具体地说是：当当n0时，相对当前记录位置记录指针向前移时，相对当前记录位置记录指针向前移动动n个记录。个记录。当当n0时，记录指针不变。时，记录指针不变。当当n0时，相对当前记录位置记录指针向后移时，相对当前记录位置记录指针向后移动动n个记录。若个记录。若n为为1时，可以直接写成时，可以直接写成skip

24、。举例：举例： skip 5 skip 2 skip （相当于（相当于 skip 1）Visual FoxPro使用与开发技术使用与开发技术55l5删除记录命令：删除记录命令：delete 、pack l逻辑删除命令：逻辑删除命令：l 格式：格式：delete fields forl 功能：给符合条件的记录打上删除标记。功能：给符合条件的记录打上删除标记。l 举例：举例：delete all for 性别性别=”女女”l物理删除命令：物理删除命令：l 格式：格式：packl 功能：将打上删除标记的记录从数据表中功能：将打上删除标记的记录从数据表中彻底删除。彻底删除。l 举例：举例：packVi

25、sual FoxPro使用与开发技术使用与开发技术566删除表中的全部记录：删除表中的全部记录：zap 格式：格式：zap 功能：删除表中的所有记录功能：删除表中的所有记录 举例：举例：zap7恢复加删除记号的命令：恢复加删除记号的命令：recall 格式：格式：recall fields for 功能：取消给记录已打上的删除标记。功能：取消给记录已打上的删除标记。 举例：举例：reca for 考试机构考试机构=劳动部劳动部Visual FoxPro使用与开发技术使用与开发技术571添加记录的命令添加记录的命令 格式：格式：append blank功能：在当前表的末尾添加记录。若有功能：在当

26、前表的末尾添加记录。若有blank选项，系选项，系统不进入全屏幕编辑，直接在表的末尾添加一条空记统不进入全屏幕编辑，直接在表的末尾添加一条空记录，其内容以后可以用其他命令填写。录，其内容以后可以用其他命令填写。举例：举例：appe2在表中插入记录在表中插入记录 格式：格式：insert blank before功能：在当前记录之前或之后插入一条或多条新记录。功能：在当前记录之前或之后插入一条或多条新记录。举例：举例：insert blank追加记录命令追加记录命令Visual FoxPro使用与开发技术使用与开发技术583添加一批记录添加一批记录格式：格式：append from数据源文件名数

27、据源文件名/? fields数据源数据源字段名列表字段名列表 f0r条件条件 type文件类型文件类型功能：该命令用于将一批记录添加到当前表的尾部。记录功能：该命令用于将一批记录添加到当前表的尾部。记录既可来自其他表，也可来自其他格式的数据文件。既可来自其他表，也可来自其他格式的数据文件。举例：可以用下面的命令将举例：可以用下面的命令将“学生表学生表”中中“入学成绩入学成绩”大大于于530分的记录添加到分的记录添加到“学生表学生表2”中。中。use d:liuliabc学生表学生表2append from d:liuliabc学生表学生表 for 入学成绩入学成绩=530browse & 看看

28、看看“学生表学生表2”中有什么记录中有什么记录 appe from d:liuliabcksml2y2_2b.txt sdfuseVisual FoxPro使用与开发技术使用与开发技术59记录的排序和索引记录的排序和索引l排序与索引排序与索引l功能：使数据记录按一定的顺序功能：使数据记录按一定的顺序(升、降升、降)排列。排列。l方式：物理排序方式：物理排序(排序排序)、逻辑排序、逻辑排序(索引索引)。 l 排序排序l 索引索引Visual FoxPro使用与开发技术使用与开发技术60Visual FoxPro使用与开发技术使用与开发技术611、 记录的排序记录的排序 记录排序是把记录按某些字段

29、的值进行排序，重新记录排序是把记录按某些字段的值进行排序，重新组织为一个新表。可以用组织为一个新表。可以用sort to来进行记录排序。来进行记录排序。命令格式：命令格式： SORT TO ON /A/D/C, ON /A/D/CASCENDING|DESCINDINGFOR|WHILE FIELDS | FIELDS LIKE |FIELDS EXCEPT 功能：根据当前数据表，建立一个经过排序的新数功能：根据当前数据表，建立一个经过排序的新数据表据表记录的排序和索引记录的排序和索引Visual FoxPro使用与开发技术使用与开发技术62命令说明命令说明l排序文件名：新表的表名（文件名）排

30、序文件名：新表的表名（文件名）lON子句中子句中l：排序字段：排序字段l/A：按升序排列，：按升序排列，/D：按降序排列，默认为升序：按降序排列，默认为升序l/C：排序时忽略大小写，否则不忽略：排序时忽略大小写，否则不忽略l若选择多个字段，表示多重排序若选择多个字段，表示多重排序先按先按排列，若字段值相同，再按排列，若字段值相同，再按排排列列lASCENDING将所有不带将所有不带/D的字段指定为升序，的字段指定为升序， DESCINDING将所有不带将所有不带/A的字段指定为降序的字段指定为降序 l缺省缺省、表示全部记录表示全部记录lFIELDS子句：新表所包含的字段子句：新表所包含的字段V

31、isual FoxPro使用与开发技术使用与开发技术63l例例 对学生选课表，按成绩降序排序，并将排对学生选课表，按成绩降序排序，并将排序结果输出到序结果输出到CJXH表中表中 lUSE 学生选课学生选课 lSORT ON 成绩成绩/D TO CJXH lUSE CJXH lBROWSEl例例lSORT TO 学生学生 ON 入学成绩入学成绩 /D,出生日期出生日期 FOR 专业编专业编号号=03 FIELDS 学号学号,姓名姓名,性别性别,出生日期出生日期,入学成绩入学成绩应用举例应用举例Visual FoxPro使用与开发技术使用与开发技术642记录的索引记录的索引 在在Visual Fo

32、xPro中中,索引文件用于存储相关数据表索引文件用于存储相关数据表文件的索引信息，它指出关于索引表达式每一个值文件的索引信息，它指出关于索引表达式每一个值的记录在对应库文件中的逻辑顺序和记录位置的记录在对应库文件中的逻辑顺序和记录位置(记录记录号号)，因此，也称之为库文件中的逻辑排序文件。以，因此，也称之为库文件中的逻辑排序文件。以下是建立索引的命令。下是建立索引的命令。格式：格式：index on 关键字表达式关键字表达式 to 索引文件名索引文件名 for条件条件unique功能：将当前表文件中的数据记录按指定的关键字功能：将当前表文件中的数据记录按指定的关键字表达式的值进行逻辑排序，排序结果存于索引文件表达式的值进行逻辑排序，排序结果存于索引文件中，并不改变当前库文件中数据记录的物理位置。中，并不改变当前库文件中数据记录的物理位置。Visual FoxPro使用与开发技术使用与开发技术65记录的查询记录的查询 查找是按照某些条件在表中查找所需记录并查找是按照某些条件在表中查找所需记录并将记录指针指向符合条件的第一条记录。将记录指针指向符合条件的第一条记录。1查找常数查找常数格式：格式：find 常数常数功能：用于查找指定常数的记录。功能：用于查找指定常数的记录。2查找表达式的值查找表达式的值格式：格式：seek 表达式表达式功能：用于查找指定表达式的记录。功能：用于查找指