【7A文】程序设计基础-程序与程序文件

1、1,第二章 程序设计基础,2.4 程序与程序文件,2,本 章 要 点,Visual FoxPro的工作方式 程序文件的建立与编辑 程序的基本结构 分支结构 循环结构 过程,3,2.4.1程序的概念,概念：程序时能够完成一定任务的命令的有序的集合。 特点：1、可以利用编辑器方便的修改和保存， 2、程序一旦建立，就可以被多次修改 3、在程序中可以出现在命令窗口中无法使用的命令和语句。 例：2.40,要 点,4,2.4.2 程序文件的建立、修改与执行,1建立或修改程序文件 可用两种方式调用系统内置的文本编辑器建立或修改程序文件 : 命令方式 MODIFY COMMAND 程序文件名 或 MODIFY FILE 程序文件名 菜单方式 打开“文件”菜单，选择“新建”；在“新建”窗口，选择“程序”，再选择“新建文件”,要 点,5,2保存程序 程序输入、编辑完毕，单击【文件】|【保存】菜单项，或按Ctrl+W复合键，在“另存为”对话框中指定程序文件的存放位置和文件名，并单击“保存”按钮保存程序文件并退出文本编辑器。程序文件的默认扩展名是.PRG。,6,3执行程序 程序文件建立后，可以用多种方式、多次

2、执行它。下面是两种常用的方式。 （1）菜单方式 单击【程序】|【运行】菜单项，打开“运行”对话框； 从文件列表框中选择要运行的程序文件，并单击“运行”命令按钮，启动运行该程序文件 （2）命令方式 【格式】DO 【功能】执行指定、下的程序文件,7,执行程序文件时，将依次执行文件中的命令，直到所有命令执行完毕，或者执行到以下命令： CANCAL：终止程序运行，清除所有的私有变量，返回命令窗口； RETURN：结束程序执行，返回调用它的上级程序，若无上级程序则返回命令窗口； QUIT：结束程序执行并退出Visual FoxPro系统，返回操作系统,8,2.4.3 简单的输入输出命令,3 简单的输入输出命令 1ACCEPT命令 【格式】ACCEPT TO 【功能】在程序执行过程中，将用户交互式输入的内容作为字符串赋值给指定内存变量。 该命令只接受字符型数据，输入的字符串不需要加定界符,9,2INPUT命令 【格式】INPUT TO 【功能】在程序执行过程中，将用户交互式输入的内容赋值给指定内存变量 可以输入字符型、数值型、逻辑型、日期型和日期时间型等类型数据，而且可以是常量、变量、函数或表达式

3、等形式，按回车键结束输入，系统将输入的数据赋值给。,10,【例】从键盘输入两个任意正数，编程求以两数为边长的长方形面积。程序文件名为PROG4.PRG SET TALK OFF CLEAR INPUT “长方形一边的长为：” TO A INPUT “长方形另一边的长为：” TO B S=A*B ? “长方形的面积为：” , S SET TALK ON RETURN,11,3WAIT命令 【格式】WAIT TO WINDOW AT, NOWAIT CLEAR|NOCLEAR TIMEOUT 【功能】显示提示信息，暂停程序执行，直到用户按任意键或单击鼠标时继续执行程序。 若选择可选项TO ，将输入的单个字符作为字符型数据赋给指定的；若用户是按Enter键或单击鼠标，的值为空串。 若省略所有可选项，屏幕显示“键入任意键继续”默认提示信息,12,4三条输入命令的异同 ACCEPT命令只能接受字符型数据，不需定界符，输入完毕按回车键结束； WAIT命令只能输入单个字符，且不需定界符，输入完毕不需按回车键； INPUT命令可接受数值型、字符型、逻辑型、日期型和日期时间型数据，数据形式可以是常量、变

4、量、函数和表达式，如果是字符串，需用定界符，输入完毕按回车键结束。,13,2.5程序的基本结构,Visual FoxPro程序由顺序结构、选择结构、循环结构三种基本结构构成。二是面向对象可视化的结构程序模块，在每个模块的内部也是由程序控制流组成。常见的控制结构如下： 1顺序结构 顺序结构是在程序执行时，根据程序中语句的书写顺序依次执行的命令序列。Visual FoxPro系统中的大多数命令都可以作为顺序结构中的语句。 2分支结构 分支结构是在程序执行时，根据不同的条件，选择执行不同的程序语句，用来解决有选择、有转移的诸多问题。,要 点,14,3循环结构 循环结构则能够使某些语句或程序段重复执行若干次。如果某些语句或程序段需要在一个固定的位置上重复操作，使用循环是最好的选择。,要 点,15,分支结构形式有如下三种： 1简单的条件语句 单向分支语句，即根据用户设置的条件表达式的值，决定某一操作是否执行。 （1）语句格式： IF条件表达式 命令行序列 ENDIF （2）语句功能： 该语句首先计算条件表达式的值，当条件表达式的值为真时，执行命令行序列；否则，执行ENDIF后面的第一条命令。 例

5、2.41,2.5.1 选择结构,要 点,16,【例】求一元二次方程AX2BXC0的实根。程序文件名为PROG7.PRG。 SET TALK OFF CLEAR INPUT TO A INPUT TO B INPUT TO C ZB2-4*A*C IF Z=0 X1=(-B+SQRT(Z)/(2*A) X2=(-B-SQRT(Z)/(2*A) ? X1,X2 ENDIF SET TALK ON RETURN,17,2一般形式的条件语句 语句格式： IF条件表达式 命令行序列1 ELSE 命令行序列2 ENDIF （2）语句功能： 该语句首先计算条件表达式的值，当条件表达式的值为真时，执行命令行序列1中的命令；否则，执行命令行序列2中的命令；执行完命令行序列1或命令行序列2后都将执行ENDIF后面的第一条命令。,要 点,18,【例】编写一密码校验程序（假设密码为ABC）。程序文件名为PROG10.PRG。 SET TALK OFF CLEAR ACCEPT “请输入您的密码：” TO AAA IF AAA=”ABC” CLEAR ? ”欢迎使用本系统！” ELSE ?”密码错误！” WAI

6、T QUIT ENDIF SET TALK ON,19,3多分支语句 语句格式： DO CASE CASE条件表达式1 命令行序列1 CASE条件表达式2 命令行序列2 CASE条件表达式N 命令行序列N OTHERWISE 命令行序列N+1 ENDCASE,要 点,20,【例】假设收入（P）与税率（R）的关系如下表，编程求税金。程序文件名为PROG12.PRG。 0 P800 R= 0.05 800 P2000 0.08 2000P5000 0.1 P5000 SET TALK OFF CLEAR INPUT “请输入收入：” TO P DO CASE CASE P800 R=0 CASE P2000 R=0.05,21,CASE P5000 R=0.08 OTHERWISE R=0.1 ENDCASE TAX=P*R ? ”税金为：”,TAX SET TALK ON RETURN,22,4使用选择语句应注意的几点 （1）IF ENDIF和DO CASE ENDCASE 必须配对使用，DO CASE与第一个CASE条件表达式之间不应有任何命令。 （2）条件表达式可以是各种表达式或函数

7、的组合，其值必须是逻辑值。 （3）命令行序列可以由一个或多个命令组成，可以是条件控制语句组成的嵌套结构。 （4）DO CASE ENDCASE 命令，每次最多只能执行一个命令行序列。在多个CASE项的条件表达式值为真时，只执行第一个条件表达式值为真的命令行序列，然后执行ENDCASE的后面的第一条命令。,要 点,23,2.5.2循环结构,1DO WHILE循环语句 【格式1】DO WHILE ENDDO,要 点,一个循环结构一般应具备如下的条件： （1）循环的初始条件：一般为给循环控制变量赋初值； （2）循环头：循环语句的起始，设置、判断循环条件； （3）循环尾：循环语句的结尾； （4）循环体：位于循环头和循环尾之间、循环控制重复执行的语句序列,24,【格式2】DO WHILE LOOP EXIT ENDDO,LOOP语句：强行返回到循环开始语句。 EXIT语句：强行跳出循环，接着执行ENDDO后的语句,25,【例2.44】编程求123100之和。程序文件名为PROG16.PRG。 SET TALK OFF CLEAR S=0 I=1 DO WHILE I=100 S=S+I I=I+

8、1 ENDDO ? ”123100”,S SET TALK ON RETURN,26,2FOR循环语句 【格式】FOR = TO STEP ENDFOR|NEXT,要 点,27,使用FOR循环语句的有关说明： 省略STEP ，则步长为默认值1； 初值、终值和步长都可以是数值表达式，但这些表达式仅在循环语句开始执行时计算一次。循环语句执行过程中，初值、终值和步长是不会改变的，并由此确定循环的次数； 可以在循环体内改变循环变量的值，但会改变循环执行次数； EXIT和LOOP命令可以出现在循环体内。执行LOOP命令时，结束本次循环，循环变量增加一个步长值，返回FOR循环头判断循环条件是否成立。执行EXIT命令时,程序跳出循环，执行循环尾后面的语句,28,【例2.47】从键盘输入10个数，编程找出其中的最大值和最小值。程序文件名为PROG23.PRG。 SET TALK OFF CLEAR INPUT “请从键盘输入一个数：” TO A STORE A TO MAX,MIN FOR I=2 TO 10 INPUT “请从键盘输入一个数：” TO A IF MAXA MIN=A ENDIF EN

9、DFOR ? “最大值为：” , MAX ? “最小值为：” , MIN SET TALK ON RETURN,29,【例6-30】输出STUDENT数据库的STUD表中所有团员的姓名和地址。程序文件名为PROG30.PRG。 SET TALK OFF CLEAR OPEN DATABASE STUDENT USE STUD SCAN FOR 是否团员 ? 姓名,地址 ENDSCAN CLOSE DATABASE SET TALK ON RETURN,30,3、SCANENDSCAN语句 一般用于处理表中的记录，可以指明条件,31,4使用循环语句时应注意的几点 （1）DO WHILE和ENDDO、FOR和ENDFOR、SCAN和ENDSCAN必须配对使用。 （2）命令行序列可以是任何FoxPro命令或语句，也可以是循环语句，即可以为多重循环。 （3）循环变量应是数值型的内存变量或数组元素。 （4）EXIT和LOOP命令嵌入在循环体内，可以改变循环次数，但是不能单独使用。EXIT的功能是跳出循环，转去执行ENDDO、ENDFOR、ENDSCAN后面的第一条命令；LOOP的功能是转回到循环的开始处，重新对“条件”进行判断，相当于执行了一次ENDDO、ENDFOR、ENDSCAN命令，它可以改变命令行序列中部分命令的执行次数。EXIT、LOOP可以出现在命令行序列的任意位置。,要 点,32,2.6 多模块程序设计,（略）,

《【7A文】程序设计基础-程序与程序文件》由会员Jerm****014分享，可在线阅读，更多相关《【7A文】程序设计基础-程序与程序文件》请在金锄头文库上搜索。