第七部分FOXBASE+程序设计基础.doc

第七部分FOXBASE+程序设计基础 一、概述 FOXBASE的两种命令方式：单命令执行方式和程序执行方式。结构化程序设计语言的三大基本结构为顺序结构、分支结构和循环结构。所有文本编辑软件均可用来建立和编辑命令文件，命令文件的扩展名为“.PRG”，FOXBASE+自身提供一个功能强大的命令文件编辑器，用于新建和编辑命令文件，其命令为：MODIFY COMMAND [文件名] 这是一条全屏幕编辑命令，输入或修改完毕后按CTRL+W（或CTRL+END）键存盘并返回圆点提示，文件的运行命令：DO 命令文件名。 二、FOXBASE+提供以下三种具有人机对话的交互赋值命令： 1、等待语句 语句格式：WAIT[提示信息]TO内存变量 该语句等待键盘输入一个字符，并可存入指定的内存变量，程序再继续运行。 功能注释： (1) 输入字符不加定界符，输入后立即执行，无需回车，无论输入何内容均作为字符型数据存储在内存变量。如果直接回车，内存变量内容则为空字符。 (2) 若不用 TO内存变量选项，输入的单字符则不保留。如果语句中省略提示信息，系统默认的提示信息是“键入任意键继续......”。 2、输入字符串语句 语句格式：ACCEPT[提示信息]TO内存变量 执行该语句时，暂停程序的运行，显示语句中的提示信息，等待用户键入数据。系统将接受的输入作为字符串存入指定的内存变量，程序继续运行。 功能注释： (1)系统将用户的输入一律作为字符串，输入时不必加定界符，以回车结束输入。 (2)输入字符串的长度不能超过254个字符（127个汉字）。 3、输入表达式语句 语句格式：INPUT[提示信息]TO内存变量 该语句等待键盘输入，将用户输入的内容作为表达式存入指定的内存变量，程序继续运行。 功能注释： （1）用户输入的数据可以是数值型、逻辑型、日期型或字符型，以回车结束输入。 （2）输入字符串时必须加定界符，输入逻辑型常量时要用圆点定界如(.T.，.F.)，输入日期型数据时要用转换函数，如CTOD(“12/27/62”)。 三、程序中常用的几个辅助命令： 1、CANCEL：关闭所有文件，清除全部内存变量，并中断程序的运行，返回到圆点提示符。 2、RETURN [TO MASTER]：结束程序的运行，返回到调用它的主程序或最高一级主程序中。 3、TEXT---文件内容----ENDTEXT：在屏幕上原样显示TEXT与ENDTEXT之间的文本内容。 四、程序的基本结构：顺序执行、判断分支、循环和子程序（过程） 1、分支结构：语句格式: IF条件 语句序列1 [ELSE 语句序列2] ENDIF 功能注释：根据条件，选择执行一个语句序列，当条件为真时，执行“语句序列1”，再执行ENDIF后面的语句或命令，当条件为假时，执行“语句序列2，再执行ENDIF后面的语句或命令。 2、分支嵌套结构程序设计： 语句格式： DO CASE CASE条件1 　　语句序列1 CASE条件2 　　语句序列2 CASE条件n 　　语句序列n [OTHERWISE 　　语句序列] ENDCASES 功能注释： （1）从DO CASE入口，顺序判断各个CASE的条件，执行最先满足条件的CASE语句序列。然后，无论后面的条件如何，从ENDCASE出口执行后面的语句。 （2）如果任何条件都不满足，则执行OTHERWISE下的语句序列，然后转向ENDCASE外的语句;若没有选用OTHERWISE子语句，则直接跳出本结构。 （3）DOCASE和ENDCASE必须成对出现，DOCASE是本结构的入口，ENDCASE是本结构的出口。 3、循环结构程序设计： DO WHILE条件 　语句序列1 　[LOOP] 　语句序列2 　[EXIT] 　语句序列3 ENDDO 功能注释： （1）执行该语句时，先判断循环开始DO WHILE的条件是否成立，如果条件为真，则执行循环体中的语句序列。当执行到ENDDO时，返回到DO WHILE，再次判断条件是否为真，以确定是否再次执行循环体。若条件为假，则结束循环，执行ENDDO下面的语句。如果第一次判断条件时，条件即为假，则循环体一次都不执行，这就是称为“先判断后执行”的语句结构。 （2）循环体中的LOOP是可选项。遇到LOOP时，不再执行其后面的语句，转回DO WHILE处重新判断条件。其作用相当于一个特殊的“短路”返回控制。 （3）EXIT也是可选项。遇到它时使无条件地退出循环，转到ENDDO下面的语句。其作用相当于一个紧急出口。 （4）通常LOOP或EXI