VisualFoxPro程序设计基础.ppt

《VisualFoxPro程序设计基础.ppt》由会员分享，可在线阅读，更多相关《VisualFoxPro程序设计基础.ppt（51页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、引入nVisual FoxPro绝大多数操作都可以通过菜单和对话框来完成，或在命令窗口输入命令来完成，这种方式属于单命令方式。当需要重复执行某些操作时，还需重新输入命令，因此使用不太方便。此外，单命令方式对运用大量命令处理复杂的数据库管理和操作时显得无能为力。为此，Visual FoxPro提供了批命令工作方式，即程序方式。n所谓程序方式是指将多条命令按一定逻辑结构组织在一个程序文件中。执行该程序文件时，程序文件中的命令被有序地执行，完成一定的任务。 8.1 程序的建立、修改和运行nVisual FoxPro具有大多数编程语言（如C/C+等）相似的基本特征，它提供了丰富的命令和系统函数，同时允

2、许自定义函数和过程。Visual FoxPro遵循结构化编程思想，把一个完整的应用程序划分成若干功能相对独立的模块，各功能模块上下层之间可以相互调用，即把应用程序模块化，采用顺序、分支、循环三种基本的程序结构来设计和编写程序。nVisual FoxPro本身提供了功能强大的程序编辑器，用来编辑源程序。 8.1.1 程序的建立u程序文件是Visual FoxPro最重要的文件类型之一。文件内容主要由若干命令组成，故又称为命令文件，程序文件的扩展名为PRG。u程序的建立是指如何将已经编写好的程序形成相应的程序文件，可以使用任何文本编辑器编辑程序，当然，Visual FoxPro本身提供了功能强大的

3、程序编辑器，用来编辑源程序。1菜单方式n方法1：使用项目管理器代码选项卡中的相应按钮可以新建、修改、运行程序文件。n方法2：选择系统菜单“文件”中的“新建”命令，在出现的“新建”对话框中，选择“程序”并单击“新建文件”按钮。2命令方式n格式1：MODIFY COMMAND |？n格式2：MODIFY FILE |？n功能：启动Visual FoxPro提供的程序编辑器来建立程序文件，若程序文件已存在，则在程序编辑器窗口中打开该文件供编辑修改。若只有“？”号而不写文件名，系统将打开一个对话框，用户可从框中列出的文件名中选择需要编辑的文件。8.1.2 程序的修改n使用文件编辑命令MODIFY CO

4、MMAND或MODIFY FILE 对已经存在的命令文件进行编辑。n还可以使用菜单操作，先使用“文件”菜单“打开”命令，选择需要修改的文件。 8.1.3 程序的运行1菜单方式1）从“程序”菜单中选择“运行”命令，打开“运行”对话框；2）从文件列表框中选择要运行的程序文件，并单击“运行”命令按钮。2命令方式DO WITH8.2 顺序结构程序设计n顺序结构是程序设计中最简单、最基本的程序结构。在该结构中，命令按照在程序中出现的先后顺序依次逐条执行，它是构成程序框架的基础。n本节介绍： 基本语句（注释语句、赋值语句、程序暂停语句、程序结束语句） 非格式化输入输出语句 格式化输入输出语句8.2.1 基

5、本语句1注释语句(1) 行首注释NOTE 或 * (2) 行尾注释如果要在命令语句的尾部加注释信息，应该使用行尾注释语句。命令格式： 2赋值语句n命令格式：STORE TO n功能：为变量或属性名赋值。也就是将表达式的值存储到内存变量或属性中。3程序暂停语句n命令格式：WAIT TO WINDOW AT TIMEOUT nn功能：暂停程序的执行，处于等待状态。可以显示提示信息，按任意键或单击鼠标后或等待一定时间后等待状态结束。同时，还可以从键盘上输入数据，实现交互式输入。说明：(1) ：指定要显示的提示信息。省略时，显示默认信息“按任意键继续”。(2) TO ：将按下的键以字符形式保存到内存变

6、量中。只接受一个字符。(3) WINDOW AT：指定提示信息窗口在Visual FoxPro主窗口中的位置。若省略AT则提示信息显示在右上角。(4) n：等待n秒，在此期间若未按任意键或单击鼠标，n秒后自动结束等待状态。4. 程序结束语句n语句1：RETURN功能：使程序执行结束，并返回到调用它的上级程序继续执行，若无上级程序则返回到Visual FoxPro主窗口。指定返回给调用程序的表达式。如果省略返回表达式，则自动将“真”(.T.) 返回给调用程序。n语句2：CANCEL功能：终止程序运行，清除程序的私有变量，并返回到Visual FoxPro主窗口。8.2.2 非格式化输入输出语句1

7、非格式化输入语句（1）INPUT命令n命令格式： INPUT 提示信息 TO 内存变量n功能：该命令在执行时显示指定的提示信息，等待用户输入，并通过按回车键来终止数据输入。键盘输入的数据存储在内存变量中。（2）ACCEPT命令n 命令格式：ACCEPT 提示信息 TO 内存变量n 功能：该命令在执行时显示指定的提示信息，等待用户输入，并通过按回车键来终止数据输入。键盘输入的数据存储在内存变量中。n 说明：该命令只能接收字符型数据输入，可以直接按回车键，相当于输入空串。【例8-3】设有学生档案表students，编写一个按学号查询学生信息的程序。students的结构见第3章相关内容。SET T

8、ALK OFFUSE studentsCLEARACCEPT 请输入学号： TO XHLOCATE FOR 学号=XHDISPLAYUSESET TALK ONRETURN2非格式化输出语句（1）表达式输出命令？和？命令格式： ？|？ 功能：计算表达式的值，并把计算结果传送到 Visual FoxPro 主窗口。说明： ？从光标下一行开始输出结果；？从当前光标位置开始输出结果。（2）文本输出命令n命令格式：TEXT 文本信息 ENDTEXTn功能：把TEXT与ENDTEXT之间的文本信息内容显示出来。【例8-4】练习使用TEXT语句输出函数的值。CLEARSET TEXTMERGE ONTEX

9、T Visual FoxPro 的系列号：Visual FoxPro 启动目录或文件夹： 当前目录或文件夹： 正在执行的程序文件名：ENDTEXT8.2.3 格式化输入输出语句n格式化输入输出语句规定了输入输出数据显示的位置和显示的格式。n命令格式：行，列 SAY 表达式GET 变量名 DEFAULT n功能：在指定的行列位置输出SAY子句表达式的值与GET变量的值，并可修改GET子句的变量值。CLEARX=SPACE(2) 2, 2 SAY 请输入起点： GET XREADFOR I=1 TO 100 CLEAR VAL(X),VAL(X)+I SAY WAIT TIME 0.1ENDFOR

10、RETURN【例8-5】下面的程序利用SAY语句的定位输出功能，实现动画效果8.3 选择结构程序设计n顺序结构的程序特点是在执行程序时，所有的命令都会执行到。但在实际应用中，有些命令的执行是取决于某些条件的成立与否。这就要借助于条件判断语句或情况语句。由条件语句构成的程序称为选择结构或分支结构。8.3.1 IF语句1语句格式格式1：IF 条件表达语句序列ENDIF格式2： IF 条件表达式 语句序列1 ELSE 语句序列2 ENDIF【例8-7】输入学生学号，查询学生信息。SET TALK OFFUSE studentsCLEARACCEPT 请输入学生学号： TO XHLOCATE FOR

11、学号=XHIF FOUND() &若找到，则FOUND()返回真值 DISPLAYELSE ? 学号：+XH+，不存在！ &提示信息没有找到 WAIT WINDOWS &按任意键程序继续ENDIFUSESET TALK ONRETURN8.3.2 DO CASE语句1语句格式 DO CASE CASE条件1 语句序列1 CASE条件2 语句序列2 CASE条件n 语句序列n OTHERWISE 语句序列n十l ENDCASE2功能n系统依次查看每一个CASE条件，只要某一个条件成立，就执行该CASE条件下的语句序列，之后跳过后面的CASE语句，去执行ENDCASE后面的语句，退出DO CASE

12、结构。若所有的条件均不成立，在有选择项OTHERWISE的情况下，执行它后面的语句序列，执行后再接着执行ENDCASE后面的语句；在没有选择项OTHERWISE的情况下，直接执行ENDCASE后面的语句。【例8-8】输入一个学生的成绩，判断是哪一个成绩段。 SET TALK OFFCLEARINPUT 请输入成绩： TO ChengJiDO CASECASE ChengJi60? 不及格CASE ChengJi70? 及格CASE ChengJi85? 优良CASE ChengJi100, 输入有误！,优异) ENDCASESET TALK ONRETURN8.4 循环结构程序设计n在Visu

13、al FoxPro中，循环用于重复执行某一段有特定功能的程序。 nVisual FoxPro提供了三种循环控制结构语句： DO WHILEENDDO FORENDFOR SCANENDSCAN8.4.1 DO WHILE语句1语句格式 DO WHILE条件表达式 语句序列1 LOOP 语句序列2 EXIT 语句序列3 ENDDO2功能n首先检查条件表达式的值，若为真就执行循环体中的语句，执行到ENDDO时，循环返回DO WHILE，再次检查条件表达式的值，值为“真”则继续执行循环体语句；值为“假”则跳出DO WHILE结构，并执行ENDDO下面的语句。如果第一次检查条件表达式的值为“假”，则循

14、环体一次都不执行。【例8-9】创建数据表，输入记录，并显示不及格学生记录，并统计不及格人数。CREATE TABLE student (学号 C(8),姓名 C(6),英语 N(3),计算机 N(3)i=1 &循环计次DO WHILE i= 10 & 添加 10 条记录, APPEND BLANKSTORE SPACE(8) to xhSTORE SPACE(6) to xmSTORE 0 TO yy, jsjCLEAR 3,10 say “学号：“ GET xh 4,10 say “姓名：” GET xm 5,10 say “英语：” GET yy6,10 say “计算机：” GET js

15、jREADREPLACE 学号 WITH xh REPLACE 英语 WITH yy REPLACE 计算机 jsj i=i+1 &每完成一次循环，循环次数加1ENDDOCLEAR fail=0 &统计不及格人数GO TOPDO WHILE .NOT EOF() &查询至表尾退出循环语句IF 英语 60 OR 计算机 60 fail=fail+1 &统计不及格人数 DISPLAY FIELDS 学号,姓名,英语,计算机 &显示不及格记录ENDIF SKIPENDDO & 结束循环?不及格人数为：+STR(fail,2) &显示不及格人数USE RETURN8.4.2 FOR语句1. 语句格式

16、FOR变量初值TO终值STEP步长 语句序列1 LOOP 语句序列2 EXIT 语句序列3 ENDFOR2. 功能n首先将初值赋给循环变量，然后判断循环条件是否成立，若成立则执行循环体，然后循环变量增加一个步长，再次判断循环条件是否成立，重复以上的过程。若循环条件不成立，则退出循环结构，执行ENDFOR后面的语句。【例8-10】打印九九算术表。CLEARFOR i=1 TO 9?FOR j=1 TO i ?SPACE(2)+STR(i,1)+X+STR(j,1)+=+STR(i*j,2)ENDFORENDFORRETURN8.4.3 SCAN语句nSCANENDSCAN是一种Visual Fo

17、xPro特有的对数据表记录进行处理的循环。1语句格式 SCAN范围FOR条件lWHILE条件2 语句序列 LOOP EXIT 语句序列 ENDSCAN2功能n对当前数据表文件指定范围内的记录进行扫描，若符合指定条件，则执行语句序列。扫描时，如果使用索引，则按照索引顺序进行，没有使用索引则按照记录在数据表中的物理顺序进行扫描。8.5 过程与函数n程序设计时，常常有些运算和处理程序是相同的，只是每次以不同的参数参与程序的执行，通过建立自定义过程和函数，可以将经常使用或具有独立功能的程序段从程序中独立出来，更加方便地实现功能调用。8.5.1 自定义过程1过程的定义PROCEDURE LPARAMET

18、ERS RETURN ENDPROC或PROCEDURE （） RETURN ENDPROC2过程的调用n可以使用DO命令调用过程，其格式为：DO IN 程序文件名WITH 参数表n关闭过程文件的方法有：(1) 打开一个新的过程文件，即关闭原打开的过程文件。(2) 用SET PROCEDURE TO命令。(3) 用CLOSE PROCEDURE命令。8.5.2 自定义函数nVisual FoxPro提供了大量标准函数，这些函数能完成若干复杂的功能。但实际应用中经常需要一些有特殊功能的函数。Visual FoxPro允许用户按一定的规则自行定义一个专用的函数，这就是自定义函数。1定义自定义函数F

19、UNCTION 函数名 LPARAMETERS 参数表 命令序列 RETURN表达式ENDFUNC或FUNCTION 函数名（） 命令序列 RETURN表达式ENDFUNC2自定义函数的调用n 调用个是：函数名(参数表)n由于自定义函数返回的是一个值，所以函数调用只能作为表达式的一部分出现。自定义函数有可能存放在同一个程序文件中，也有可能存放在其他程序文件中，所以调用存放在其他程序文件或过程文件中的自定义函数时，要注意使用SET PROCEDURE TO程序文件名打开相应的程序文件。8.5.3 参数传递n我们把调用程序传递给过程或函数的“数据”，称作“参数”。过程或函数对接收到的参数进行处理，

20、或根据接收到的参数完成相应的任务。在定义过程与函数时，使用LPARAMETERS命令指定要接收的参数。n格式：LPARAMETERS ,说明：(1) LPARAMETERS语句用来声明参数表中的各个变量。这些参数也叫形式参数。(2) LPARAMETERS语句必须作为过程体的第一条可执行语句。(3) 也可以使用PARAMETERS语句声明形参变量，二者区别是：LPARAMETERS声明的形参变量默认为局部变量，过程结束后，即被清除。PARAMETERS声明的形参变量为私有变量。8.6 面向过程的程序设计实例n面向过程的程序设计，把要解决的问题看作一系列将被完成的任务，按照任务完成的过程来编写程序。整个系统以功能分类，遵循模块化思想，应用程序被分为若干个功能模块，其中各个功能模块如果需要，还可以划分为更为具体的小功能模块，直至该功能模块能以一个过程或者一个函数来实现为止。 下面的程序实例，把学生成绩管理应用程序分为增加、查询、修改、删除四个功能模块，分别用四个过程来实现，通过主控程序实现对各功能模块的调用。 程序运行效果图结束结束