计算机vf-第八章--程序设计基础1课件

《计算机vf-第八章--程序设计基础1课件》由会员分享，可在线阅读，更多相关《计算机vf-第八章--程序设计基础1课件（41页珍藏版）》请在金锄头文库上搜索。

1、第八章 程序设计基础,一、VF的工作方式 二、程序的建立与运行 三、程序中的交互语句及辅助语句 四、程序的基本结构 五、过程设计,VF的工作方式,VF的三种工作方式：命令方式、菜单方式、程序文件方式。 程序文件（命令文件）方式： 程序：就是根据所解决问题的需要，将能完成相应功能的命令或语句按照一定的逻辑关系组织起来的命令集合。 程序文件的扩展名为.PRG。,返回,程序的建立与运行,以命令方式建立、编辑程序文件 格式：MODIFY COMMAND 功能：建立或编辑修改程序文件。 说明： 扩展名默认为PRG。 文件名为默认路径下已有的文件，则使用此命令表示修改指定的程序。 文件名为默认路径下没有的

2、文件，则使用此命令表示新建指定的程序。 命令：MODI COMM ？ 功能：从文件列表中选择要修改的程序。 保存程序：1、用“文件”菜单中的”保存“命令。 2、工具栏上的”保存“按钮。 3、按关闭按钮。,程序的建立与运行,程序书写规则： 程序中的每条命令都必须以回车结尾。 一行只能写一条命令，若命令需分行写，应在一行尾加“；”号续行，然后回车。 以菜单方式建立、编辑程序文件 用“项目管理器”建立、编辑程序文件,程序文件的调用 以命令方式调用 格式：DO 说明：程序运行中，遇到以下情况之一，将终止程序运行： 执行到程序尾，自然结束，返回VF系统主窗口。 执行了RETURN命令，终止程序执行，返回

3、原调用处的下一语句继续执行。（主要用于过程中） 执行了CANCEL命令，终止程序执行返回系统主窗口。 执行了QUIT命令，终止程序执行，退出VF系统。 以菜单方式调用程序文件,程序中的交互语句及辅助语句,简单的格式化输入、输出命令 格式化输入命令 (P140) 格式：语句1： SAY GET DEFAULT 语句2：READ 功能：语句1的功能是在屏幕指定位置显示和的值。语句2的功能是重新编辑修改的值。 说明： 要输入编辑数据，语句1、2必须联用，可编辑类型：C、N、D、L型。 SAY 用于对GET 变量作提示性说明。,程序中的交互语句及辅助语句,变量可为字段名变量，也可为内存变量，内存变量必

4、须有初值,或用DEFAULT短语的指定初值.初值一旦指定,该变量的类型在编辑期间就不能改变,字符型变量的宽度与数值型变量的小数位数也无法改变。 例1：编程在RCDA表中追加记录，并输入编号、姓名、性别、出生日期、工资现状的值。(ZJ.PRG) 例2：编程输入BH、XM、XB、RQ、GZ变量的值，并将其追加到RCDA表中。(ZJ1.PRG),程序中的交互语句及辅助语句,格式化输出命令 格式： SAY FUNCTION PICTURE 例：查找王国民并输出。(CHAZ.PRG),人机对话命令 输入单字符命令WAIT 格式：WAIT TO 功能：暂停程序执行，等待用户键入一字符后继续。 说明： 输入

5、的任何数据，均作为字符型数据处理。 只能输入一个字符或直接回车（回车相当于输入空串）。 一般用字符串说明，不选用则自动提示“按任一键继续”。 选用TO 时，可将输入的字符保存在内存变量中，以便以后使用。 例：若有表文件WJ1.DBF、WJ2.DBF、WJ3.DBF，如何实现只输入一个字符而能打开这些表。,人机对话命令,输入字符串命令ACCEPT（可输入多个字符） 格式：ACCEPT TO 功能：暂停程序执行，等待用户输入一串字符后，按回车键程序继续运行。 说明： 输入的任何数据，均作为字符型数据处理。 提示信息的用法与WAIT语句相同，不选用则不提示（与WAIT不同）。 例1：根据输入的文件名

6、,打开指定的表文件。 例2：在RCDA表中按指定姓名（出生日期、工资）查询（LOCATE，SEEK）记录。(XMCZ),输入多种类型数据命令INPUT 格式：INPUT TO 功能：暂停程序执行，等待用户输入数据，回车后继续。 说明： 输入的数据类型可为C、N、D、L。 输入字符型数据，必须加定界符；输入日期型，用yyyy-mm-dd或用CTOD（）函数转换。 例1：在RCDA表中按指定姓名查询。(XMCZ.PRG) 例2：在RCDA表中按指定工资（生日）查找。 小结：区别WAIT、ACCEPT、INPUT三条命令的不同。,辅助命令 CLEAR 清屏命令 NOTE| * 注释 必须自成一行，对

7、程序段作说明。 & 注释 接在命令语句后对该语句作说明。 TEXT ENDTEXT 功能：原样输出TEXT与ENDTEXT之间的内容。 (CD.PRG),程序的基本结构,VF系统的应用程序中，常见的控制结构有： 顺序结构 特点：按照语句书写的先后顺序依次执行，执行到程序尾退出。 缺陷：1、一次只能操作一组数据； 2、不能对数据进行判断。 分支结构 一、简单分支语句 格式：IF ENDIF 意义：略。,一、简单分支语句,说明：IF、ENDIF必须成对使用。 可以是表达式，也可是函数，但结果必须为逻辑值。 例1：在RCDA表中按姓名查询记录，找到则显示该记录，没找到则提示“无此姓名的记录！”。 例

8、2：从键盘输入两个不同的自然数，输出其中最大的。 例3：按姓名查询，并提示是否进行修改，回答“Y”则修改，否则退出。(CDXG.PRG),二、选择分支语句 格式：IF ELSE ENDIF 意义：略。 例1：P150。 例2：修改前面的例2。,三、多分支语句,格式：DO CASE CASE CASE OTHERWISE ENDCASE 功能说明：略。,三、多分支语句,注意： DO CASE与ENDCASE必须成对出现。 DO CASE与CASE之间不能放其它语句。 各条件不能互相包含，即不能让两个或两个以上的值为.T.，因为程序只能执行第一个值为.T.的所对应的语句序列。 例1：P151。 例

9、2：从键盘上输入三个不同的自然数，输出其中最大的。,四、分支语句的嵌套 结构：略。 例1：对DJPD表，根据学号查询，对查到的记录再根据平均分定等级，并填写等级字段，（85分以上为优，7685为良，6075为中，60分以下为差）若没找到则显示：“查无此人！”。 例2：对成绩表，根据学号查询，对查到的记录再判断其民族，若为少数民族则总分+5，否则不加分，若没找到指定记录，则提示：“查无此人！”。 注意： ELSE与ENDIF都与最近的IF语句匹配。 各分支结构不能相互交叉。,循环结构程序设计 一、当型循环 格式：DO WHILE LOOP EXIT ENDDO 意义：当为.T.时，重复执行DO

10、WHILE与ENDDO之间的语句序列，直到为.F.时，退出循环继续执行ENDDO之后的语句。,一、当型循环,注意： LOOP、EXIT只能在循环中使用，而不能在循环外使用。 DO WHILEENDDO语句本身不具有给循环变量赋初值的功能，因此应当在该语句之前给循环变量赋初值，并在循环体中修改循环变量的值。 LOOP作用：不再执行其后的语句序列，而进入下一次循环，即重新返回DO WHILE处判断条件的值。 EXIT作用：强制退出循环，继续执行ENDDO之后的语句。,几种常见的循环结构： 1、对数据表记录进行操作的循环 特点： 循环条件一般用.NOT. EOF()。 用SKIP命令修改循环条件。

11、循环体中操作对象是数据表中的记录。 例1：逐条显示RCDA表中性别为女的记录。（条件分别为.NOT. EOF()与.NOT. BOF()。） 例2：在RCDA表中，按性别查找，依次对性别为女的工资加100元。,1、对数据表记录进行操作的循环,例3：在成绩表中，统计解几成绩分别在85分以上，76至85分，小于76分的学生的人数。 ：在DJPD表中，按平均分对每人评定等级，并将评定结果填到等级字段中。( 85分以上为优，7685为良，6075为中，60分以下为差）,2、循环次数一定的循环,特点： 循环次数一定。 循环条件多为关系表达式，其中含控制循环次数的循环变量。 循环变量有初值和终值。 循环体

12、中有修改循环变量的语句，使循环变量增或减值，否则成为死循环。 例1：求1到100之间所有整数之和。（两种方法） 例2：求1到100之间的奇数和。（三种方法） 练习：求10！。,特点： 随机条件总是为T。（这样就不能自动退出循环死循环） 必要时，可使用EXIT、RETURN、CANCEL、QUIT强制退出循环） 例：在RCDA表中，实现可连续按姓名查询。 作业：用循环语句编程判断任意一个由键盘输入的数是否为素数。,3、随机循环,二、“计数”型循环控制语句 格式：FOR = TO STEP LOOP EXIT ENDFOR|NEXT 功能：循环变量首先被赋为变量初值，然后比较循环变量与终值来决定是

13、否执行循环体内的命令语句。步长值为正数时，若循环变量值不大于终值，就执行循环体；步长为负数时，若循环变量不小于终值，就执行循环体。执行一遇到ENDFOR或NEXT，循环变量立即被加上步长值，然后重新与结束值比较。 说明：如果无STEP短语，默认步长值为1。 例：改写前面当型循环的例子。,三、“指针”型循环控制语句,格式：SCAN FOR WHILE LOOP EXIT ENDSCAN 功能：程序执行到该语句，首先判断EOF()函数的值，若为真，则执行ENDSCAN之后的语句；否则结合条件1与条件2执行循环中的，然后指针移到下一条范围内满足条件的记录，再判断EOF()的值，直到EOF()为真结束

14、循环。,四、多重循环：即循环体中又包含另外一些循环。,格式：略。 例1：在RCDA表中，按性别查询，要求能逐条查到所有性别相同的记录并显示。 例2：打印九九表。 练习：输出3到100之间的所有素数。（输出格式：一行输出5个数，每个数间用5空格隔开。）,过程与过程调用,引入 定义：我们将以过程说明语句开头，以返回命令结束，能完成一定功能，可以被其它程序反复调用的程序段叫做过程。 过程的分类： 1、以独立文件存在的过程，称为外部过程。 2、若干个过程共存于一个过程文件的过程，称为内部过程。,过程返回语句 1、RETURN TO MASTER 功能：返回调用程序原调用处的下一语句继续执行。 TO M

15、ASTER的作用：用在过程嵌套中，直接返回最高层调用处，如不选，则逐级返回。 2、RETRY 功能：返回调用程序原调用语句，继续执行。 外部过程的建立及调用： 1、建立与建立一般程序相同。,求5!+10!+20! SET TALK OFF S=0 N=1 T=1 DO WHILE N=5 T=T*N N=N+1 ENDDO S=S+T N=1 T=1 DO WHILE N=10 T=T*N N=N+1 ENDDO S=S+T N=1 T=1 DO WHILE N=20 T=T*N N=N+1 ENDDO S=S+T ?5!+10!+20!=,S SET TALK ON,返回,2、过程调用 格式：DO 说明：可以将过程保存在单独的程序文件中，也可放在程序的结尾，但不能把可执行的主程序放在过程之后。 例：改写引入程序。 思考：求C=M!/(N!*(M-N)!),过程文件及使用 1、过程文件的建立 格式：MODI COMM 2、过程文件的组织形式 PROCEDURE ENDPROC PROCEDURE ENDPROC,3、过程文件的调用 步骤：打开过程文件 格式：SET PROCEDURE TO 注意：同一时刻只允许打开一个过程文件。 调用过程文件