第7章 结构化程序设计优秀PPT.ppt

《第7章 结构化程序设计优秀PPT.ppt》由会员分享，可在线阅读，更多相关《第7章 结构化程序设计优秀PPT.ppt（64页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、第7章 结构化程序设计现在学习的是第1页，共64页7.1 7.1 程序设计的基本概念与步骤程序设计的基本概念与步骤 7.2 7.2 顺序结构程序设计顺序结构程序设计 7.3 7.3 分支结构程序设计分支结构程序设计 7.4 7.4 循环结构循环结构7.5 7.5 子程序、过程与自定义函数子程序、过程与自定义函数 提要提要现在学习的是第2页，共64页7.1 程序设计的基本概念与步骤7.1.1 程序设计的基本概念程序设计的基本概念 程序设计反映了利用计算机解决问题的全过程，包含多方面的内容，而程序设计反映了利用计算机解决问题的全过程，包含多方面的内容，而编写程序只是其中的一个方面。使用计算机解决实

2、际问题，通常是先对问题编写程序只是其中的一个方面。使用计算机解决实际问题，通常是先对问题进行分析并建立数学模型，然后考虑数据的组织方式和算法，并用某一种程进行分析并建立数学模型，然后考虑数据的组织方式和算法，并用某一种程序设计语言编写程序，最后调试程序，使之运行后能产生预期的结果。这个序设计语言编写程序，最后调试程序，使之运行后能产生预期的结果。这个过程称为程序设计。过程称为程序设计。基于本书的教学对象和面向要处理问题的简单性，本书简化了其他过基于本书的教学对象和面向要处理问题的简单性，本书简化了其他过程，主要介绍怎样使用程，主要介绍怎样使用Visual FoxPro语句来编写程序的环节。对于

3、语句来编写程序的环节。对于Visual FoxPro程序来讲就是为实现某一任务，将若干条程序来讲就是为实现某一任务，将若干条Visual FoxPro命令和程序设计语句按一定的结构组成的命令序列，它保存在一个命令和程序设计语句按一定的结构组成的命令序列，它保存在一个以以.PRG为扩展名的文本文件中。为扩展名的文本文件中。现在学习的是第3页，共64页7.1.2 结构化程序设计的特点及基本结构 结构化程序设计方法是被普遍采用的一种程序设计方法，结构化程序设计方法是被普遍采用的一种程序设计方法，要求设计者按照一定的结构形式来设计和编写内要求设计者按照一定的结构形式来设计和编写内容，采用自上而下，逐步

4、细化的原则，将设计过程分为若容，采用自上而下，逐步细化的原则，将设计过程分为若干层次，逐步解决。在解决这些问题的过程中，会采用相干层次，逐步解决。在解决这些问题的过程中，会采用相应的结构和一定的算法来控制和组织程序。应的结构和一定的算法来控制和组织程序。现在学习的是第4页，共64页1算法概念及表示算法概念及表示算法：为某目标功能而设计的处理流程以及使用命令来实现的方法。算法：为某目标功能而设计的处理流程以及使用命令来实现的方法。表示算法的形式有很多，本书中介绍利用流程图来表示的方法。这种方法使表示算法的形式有很多，本书中介绍利用流程图来表示的方法。这种方法使用不同的几何图形框来代表各种不同性质

5、的操作，直观易于理解。用不同的几何图形框来代表各种不同性质的操作，直观易于理解。常用的流程符号如图7-1所示图7-1 流程符号现在学习的是第5页，共64页2 2程序的控制结构程序的控制结构任何复杂的程序都由任何复杂的程序都由3 3种基本控制结构组成。它们是顺序结构、选择结构种基本控制结构组成。它们是顺序结构、选择结构和循环结构。和循环结构。顺序结构：顺序结构：根据程序中语句的书写顺序依次执行的命令序列。根据程序中语句的书写顺序依次执行的命令序列。分支结构：分支结构：在程序执行过程中，根据不同的条件，选择执行不同的程序语在程序执行过程中，根据不同的条件，选择执行不同的程序语句，用来解决有选择，有

6、转移的诸多问题。分支结构以条件或判断为起始句，用来解决有选择，有转移的诸多问题。分支结构以条件或判断为起始点，根据逻辑判断是否成立而决定程序运行的走向。点，根据逻辑判断是否成立而决定程序运行的走向。循环结构：循环结构：根据特定的条件，从某处开始有规律的反复执行某一处理块根据特定的条件，从某处开始有规律的反复执行某一处理块（循环体），循环体的执行次数由一个控制循环的条件决定。（循环体），循环体的执行次数由一个控制循环的条件决定。这三种结构的流程图如图这三种结构的流程图如图7-27-2表示：表示：现在学习的是第6页，共64页图图7-2 三种结构流程图三种结构流程图 现在学习的是第7页，共64页3程

7、序的模块化结构程序的模块化结构模块化是结构化程序的重要原则，所谓模块化就是把大程序按照功能分模块化是结构化程序的重要原则，所谓模块化就是把大程序按照功能分为较小的程序。一般来讲，一个程序是由一个主控模块和若干子模块组为较小的程序。一般来讲，一个程序是由一个主控模块和若干子模块组成的，主控模块用来完成某些公用操作及功能选择，而子模块用来完成成的，主控模块用来完成某些公用操作及功能选择，而子模块用来完成某项特定的功能。某项特定的功能。这种设计风格便于分工合作，将一个庞大的模块分解为若干个子模块分这种设计风格便于分工合作，将一个庞大的模块分解为若干个子模块分别完成，然后用主控模块调用子模块。这种程序

8、的模块化结构如（图别完成，然后用主控模块调用子模块。这种程序的模块化结构如（图7-3）所示：）所示：结构化程序的设计过程就是将问题求解由抽象逐步具体化的过程。这种结构化程序的设计过程就是将问题求解由抽象逐步具体化的过程。这种方法符合人们解决复杂问题遵循的普遍规律，可以显著提高程序设计的方法符合人们解决复杂问题遵循的普遍规律，可以显著提高程序设计的效率。效率。现在学习的是第8页，共64页图图7-3 7-3 程序的模块化结构程序的模块化结构 现在学习的是第9页，共64页7.1.3 程序设计的基本步骤 程序设计的步骤一般分为程序设计的步骤一般分为问题分析、确立算法、编写程序和调试序。问题分析、确立算

9、法、编写程序和调试序。问题分析问题分析是按程序开发书中用户要求进行具体的分析，确定编程的目是按程序开发书中用户要求进行具体的分析，确定编程的目标；标；确定算法确定算法就是选择较好的计算方法解决问题；就是选择较好的计算方法解决问题；编写程序编写程序是按计算机语言和确定的算法进行编码，最后把编好的程序是按计算机语言和确定的算法进行编码，最后把编好的程序送入计算机运行并反复调试检查，纠正错误，直到得到正确的结果为送入计算机运行并反复调试检查，纠正错误，直到得到正确的结果为止。止。现在学习的是第10页，共64页7.1.4 程序文件的建立与执行 程序文件（简称程序）也叫命令文件，它的扩展名为程序文件（简

10、称程序）也叫命令文件，它的扩展名为.PRG。用户用户可在命令方式和菜单方式下建立并执行程序文件。可在命令方式和菜单方式下建立并执行程序文件。1在命令方式下建立和编辑程序文件在命令方式下建立和编辑程序文件【格式】【格式】MODIFY COMMAND 【功能】【功能】打开程序文件编辑窗口，建立、编辑一个指定的程序文打开程序文件编辑窗口，建立、编辑一个指定的程序文件，其扩展名为件，其扩展名为.PRG。【说明】说明】当程序输入或修改完成，可执行当程序输入或修改完成，可执行“文件文件”菜单中的菜单中的“保存保存”命命令，或关闭编辑窗口，或按令，或关闭编辑窗口，或按CTRL+W键将文件存盘。若要放弃当键将

11、文件存盘。若要放弃当前的编辑内容，则按前的编辑内容，则按CTRL+Q键。键。现在学习的是第11页，共64页【例【例7-1】建立程序文件建立程序文件EX1.PRG，在屏幕上显示在屏幕上显示“欢迎使用学欢迎使用学生管理系统生管理系统”信息。操作步骤如下：信息。操作步骤如下：（1）在命令窗口中输入命令）在命令窗口中输入命令MODIFY COMMAND EX1，如图如图7-4所示。所示。图图7-4 7-4 命令窗口命令窗口 现在学习的是第12页，共64页（2）输入命令后按回车键，进入程序编辑窗口。接着在程序编辑窗）输入命令后按回车键，进入程序编辑窗口。接着在程序编辑窗口中逐条输入口中逐条输入3条程序语

12、句，如图条程序语句，如图7-5所示。所示。（3）输输入入完完语语句句后后，按按Ctrl+W键键将将程程序序存存盘盘，建建立立程程序序文文件件EX1.PRG，并并返返回回到系统主窗口。到系统主窗口。图7-5 程序编辑窗口现在学习的是第13页，共64页2用菜单方式建立和编辑程序文件用菜单方式建立和编辑程序文件在在Visual FoxPro中，用菜单方式建立和编辑程序文件的操作步骤如下：中，用菜单方式建立和编辑程序文件的操作步骤如下：（1）选择）选择“文件文件”菜单下的菜单下的“新建新建”命令，出现命令，出现“新建新建”对话框，如图对话框，如图7-6所示。所示。图图7-6“新建新建”对话框对话框现在

13、学习的是第14页，共64页（2）在）在“新建新建”对话框中，选中对话框中，选中“程序程序”项，单击项，单击“新建文新建文件件”按钮，进入程序编辑窗口，如图按钮，进入程序编辑窗口，如图7-7所示。所示。图图7-7 7-7 程序编辑窗口程序编辑窗口（3）在程序编辑窗口中，逐条输入命令行或程序语句。）在程序编辑窗口中，逐条输入命令行或程序语句。现在学习的是第15页，共64页（4）输入完毕，按）输入完毕，按Ctrl+W键存盘，或打开键存盘，或打开“文件文件”菜单，单击菜单，单击“保存保存”按钮按钮（或（或“另存为另存为”命令），打开命令），打开“另存为另存为”对话框，如图对话框，如图7-8所示。所示。

14、图图7-8 “另存为另存为”对话框对话框（5）选择盘符及文件目录，输入程序的文件名，然后单击）选择盘符及文件目录，输入程序的文件名，然后单击“保存保存”按钮，保按钮，保存当前程序文件。如果单击存当前程序文件。如果单击“取消取消”按钮，则返回到程序编辑窗口，继续编按钮，则返回到程序编辑窗口，继续编辑。辑。现在学习的是第16页，共64页3用命令方式运行程序文件用命令方式运行程序文件【格式】【格式】DO【功能】【功能】在命令窗口运行扩展名为在命令窗口运行扩展名为.PRG的程序文件。的程序文件。4用菜单方式运行程序文件用菜单方式运行程序文件在在Visual FoxPro的菜单方式下运行程序文件的操作步

15、骤如下：的菜单方式下运行程序文件的操作步骤如下：（1）打开）打开“程序程序”菜单，单击菜单，单击“运行运行”命令，出现命令，出现“运行运行”对话框，如图对话框，如图7-9所示。所示。（2）在）在“运行运行”对话框中，选定程序文件名，然后单击对话框中，选定程序文件名，然后单击“运行运行”按钮，运按钮，运行程序。行程序。现在学习的是第17页，共64页建立程序文件时，需要在文件中按语句格式要求输入相关建立程序文件时，需要在文件中按语句格式要求输入相关的命令，下面将介绍语句的书写规则和一些其它常用命令。的命令，下面将介绍语句的书写规则和一些其它常用命令。图图7-9 “运行运行”对话框对话框 现在学习的

16、是第18页，共64页5程序的书写规则程序的书写规则编写编写Visual FoxPro程序时，应注意以下几点：程序时，应注意以下几点：（1 1）程序中的每一行只能书写一条命令，每条命令都以回车键结束。程序中的每一行只能书写一条命令，每条命令都以回车键结束。（2 2）一条命令可以分成多行书写，可在行末键入续行标志一条命令可以分成多行书写，可在行末键入续行标志“；”，然后按回车键。然后按回车键。（3 3）为了提高程序的可读性，可在程序的行首加入注释语句，以为了提高程序的可读性，可在程序的行首加入注释语句，以注释符注释符“*”开头，说明程序的功能；也可以在每一条命令的行尾添开头，说明程序的功能；也可以

17、在每一条命令的行尾添加注释，以注释符加注释，以注释符“&”开头，注明每条语句的功能及含义。开头，注明每条语句的功能及含义。现在学习的是第19页，共64页6 6编程中的常用语句介绍编程中的常用语句介绍（1）交互式输入命令）交互式输入命令1）WAIT单字符输入命令单字符输入命令【格式】【格式】WAITTOWINDOW AT【功能】【功能】暂停程序的运行，并在屏幕上显示提示信暂停程序的运行，并在屏幕上显示提示信息，等待用户从键盘上输入一个字符（或按任意键后），继续往下执行。息，等待用户从键盘上输入一个字符（或按任意键后），继续往下执行。现在学习的是第20页，共64页【说明】是提示用户进行操作的信息，

18、当此项缺省时，屏幕上是提示用户进行操作的信息，当此项缺省时，屏幕上显示显示“按任意键继续按任意键继续”的信息，当按任意键后，将继续执行。的信息，当按任意键后，将继续执行。选择选择TO是将输入的字符保存到指定的内存变量中，是将输入的字符保存到指定的内存变量中，否则，输入的字符不予以保存。否则，输入的字符不予以保存。选择选择WINDOW AT 选项时，可在屏幕右上角出现选项时，可在屏幕右上角出现一个一个WAIT提示窗口。提示窗口的位置也可以由提示窗口。提示窗口的位置也可以由AT中的行列值指定。中的行列值指定。【例【例7-2】WAIT命令的应用举例。命令的应用举例。WAIT WAIT 请按任意键继续

19、请按任意键继续!WAIT 请按任意键继续请按任意键继续!WINDOW AT 16,20现在学习的是第21页，共64页2）ACCEPT字符串输入命令字符串输入命令【格式】ACCEPT TO【功能】【功能】先显示提示信息，然后等待用户从键盘上输入字符型数据先显示提示信息，然后等待用户从键盘上输入字符型数据到指定的内存变量中。到指定的内存变量中。【例7-3】显示表XSQK中指定学生姓名的记录。CLEAR&清除屏幕USE XSQK EXCLUSIVE&打开表xsqk.dbfACCEPT“请输入姓名：”TO xm&输入学生姓名LIST FOR 姓名=xm&显示所输入的学生的记录现在学习的是第22页，共6

20、4页3）INPUT表达式输入命令表达式输入命令【格式】【格式】INPUT TO【功能】【功能】先显示提示信息，然后等待用户从键盘上输入数据到指定先显示提示信息，然后等待用户从键盘上输入数据到指定 的内存变量中。的内存变量中。【说明】【说明】用用INPUT命令输入的数据，可以是数字型、字符型、日期命令输入的数据，可以是数字型、字符型、日期 型和逻辑型。是字符型、日期型和逻辑型时必须加定界符。型和逻辑型。是字符型、日期型和逻辑型时必须加定界符。【例【例7-4】显示表显示表XSQK中指定年代的记录。中指定年代的记录。CLEAR&清除屏幕清除屏幕 USE XSQK EXCLUSIVE&打开表打开表xs

21、qk.dbf INPUT“请输入出生年代请输入出生年代:”TO rq&输入年代值输入年代值 LIST FOR YEAR(出生日期出生日期)=rq&显示指定年代的记录显示指定年代的记录现在学习的是第23页，共64页4）定位输入命令）定位输入命令【格式】【格式】SAY GET READ【功能】功能】在屏幕指定的行列位置上输入数据。在屏幕指定的行列位置上输入数据。【说明】【说明】命令中的各选项说明如下：命令中的各选项说明如下：是指屏幕窗口的位置。是指屏幕窗口的位置。SAY 给出提示信息。给出提示信息。GET 取得变量的值。其中取得变量的值。其中可以是字段变量或内存可以是字段变量或内存 变量，如果是字

22、段变量，应先打开表文件，如果是内存变量，应先赋变量，如果是字段变量，应先打开表文件，如果是内存变量，应先赋 值。值。GET子句必须使用命令子句必须使用命令READ激活。在带有多个激活。在带有多个GET子句的命令后，子句的命令后，必须遇到必须遇到READ命令才能编辑命令才能编辑GET中的变量。当光标移出这些中的变量。当光标移出这些GET变变量组成的编辑区时，量组成的编辑区时，READ命令才执行结束命令才执行结束。现在学习的是第24页，共64页（2）.其他命令其他命令1）清屏命令）清屏命令CLEAR【格式】格式】CLEAR【功能】功能】清除屏幕上的内容。清除屏幕上的内容。2）文本输出）文本输出TE

23、XT与与ENDTEXT【格式】格式】TEXT ENDTEXT【功能】功能】把把TEXT与与ENDTEXT之间的文本信息按书写形式的原样显示在屏幕上。之间的文本信息按书写形式的原样显示在屏幕上。【说明】【说明】TEXT与与ENDTEXT之间的文本信息可为一行或多行，可以是字符串或汉字之间的文本信息可为一行或多行，可以是字符串或汉字信息。信息。TEXT与与ENDTEXT必须成对出现。必须成对出现。【例【例7-5】TEXT *全国计算机等级考试全国计算机等级考试 *ENDTEXT现在学习的是第25页，共64页4）返回命令）返回命令RETURN【格式】RETURN【功能】结束当前程序的运行。【说明】如

24、果当前程序无上级程序，该命令用于结束程序的运行，返回到命令窗口。如果当前程序是一个子程序，该命令用于结束当前程序运行，返回到调用该程序的上级程序中。5）终止程序文件的执行）终止程序文件的执行CANCEL【格式】CANCEL【功能】该命令可以终止程序执行并关闭所有打开的文件，返回到系统的命令窗口。6）退出系统）退出系统QUIT【格式】QUIT【功能】可以终止程序的运行，关闭所有打开的文件，正常退出Visual FoxPro系统，返回到Windows环境。该命令与Visual FoxPro“文件”菜单中的“退出”命令功能相同。现在学习的是第26页，共64页7.2 顺序结构程序设计顺序结构程序设计顺

25、序结构是程序中最简单、最常用的基本结构。这种结构的程序运行时，按顺序结构是程序中最简单、最常用的基本结构。这种结构的程序运行时，按程序中命令（语句）书写的先后顺序一条一条地从上至依次执行。程序中命令（语句）书写的先后顺序一条一条地从上至依次执行。【例【例7-6】顺序显示学生表（学生顺序显示学生表（学生.DBF）中的前四条记录中的前四条记录,学生表信息学生表信息如图如图7-10所示所示 图 7-10 学生表内容 现在学习的是第27页，共64页程序如下：程序如下：oSET TALK OFFSET TALK OFFoCLEAR&CLEAR&清屏清屏oUSE USE 学生学生oDISPLAY&DISP

26、LAY&显示第显示第1 1条记录条记录oWAIT WAIT 按任意键，显示下一个学生的信息按任意键，显示下一个学生的信息 oSKIP&SKIP&记录指针下移一条记录记录指针下移一条记录oDISPLAY&DISPLAY&显示第显示第2 2条记录条记录oWAIT WAIT 按任意键，显示下一个学生的信息按任意键，显示下一个学生的信息 oSKIP&SKIP&记录指针下移一条记录记录指针下移一条记录oDISPLAY&DISPLAY&显示第显示第3 3条记录条记录o?“现在显示的是第现在显示的是第”+STR(RECNO()+STR(RECNO()+“条记录条记录”&显示显示“现在显示的是第现在显示的是第

27、3 3条记录条记录”oUSEUSEoSET TALK ONSET TALK ONoRETURN&RETURN&程序结束程序结束 现在学习的是第28页，共64页【程序说明】【程序说明】其中其中 “现在显示的是现在显示的是“+str(recno()+str(recno()+”条记录条记录“是一个字符串表是一个字符串表达式达式 ，该表达式由字符串常量，该表达式由字符串常量 “现在显示的是第现在显示的是第“与字符型函数与字符型函数str(recno()str(recno()及字符串常量及字符串常量”条记录条记录“三部分通过三部分通过 “+“连接而成。连接而成。表达式的值为表达式的值为“现在显示的是第现

28、在显示的是第3 3条记录条记录”，其中，其中3 3是由函数是由函数recno()recno()获得。获得。现在学习的是第29页，共64页【例【例7-77-7】在学生表（学生在学生表（学生.DBFDBF）中查找指定学号所对应的该学生，中查找指定学号所对应的该学生，按格式显示并可修改姓名、性别和出生日期三个字段的信息。按格式显示并可修改姓名、性别和出生日期三个字段的信息。学生表信息如上图学生表信息如上图7-107-10所示所示现在学习的是第30页，共64页程序如下：程序如下：oSET TALK OFF SET TALK OFF oCLEARCLEARoUSE USE 学生学生oACCEP ACCE

29、P 请输入学生学号请输入学生学号:TO xh TO xh oLOCATE ALL FOR ALLTRIM(LOCATE ALL FOR ALLTRIM(学号学号)=)=xh xh o2,2 SAY*2,2 SAY*显示学生信息显示学生信息*o3,2 3,2 SAY SAY 学生姓名学生姓名:GET GET 姓名姓名o3,20 3,20 SAY SAY 性别性别:GET GET 性别性别o4,2 4,2 SAY SAY 学号学号:GET GET 出生年月出生年月 oREADREADo5,2 SAY*5,2 SAY*显示结束显示结束*oUSEUSEoSET TALK ONSET TALK ONoR

30、ETURNRETURN【程序说明】程序说明】要求用户从键盘上输入学号。然后执行定位查询语句要求用户从键盘上输入学号。然后执行定位查询语句找到该学生，然后用定位输出语句显示提示和字段内容。其中特别找到该学生，然后用定位输出语句显示提示和字段内容。其中特别要注意函数要注意函数alltrim()alltrim()的使用。的使用。现在学习的是第31页，共64页7.3 分支结构程序设计分支结构程序设计在例在例7-77-7中，我们已经能够实现一个简单的查询程序，但该例中没有中，我们已经能够实现一个简单的查询程序，但该例中没有对语句对语句“LOCATE ALL FOR ALLTRIM(LOCATE ALL

31、FOR ALLTRIM(学号学号)=)=xhxh“的执行情况进行判断，的执行情况进行判断，这里可能存在两种情况：这里可能存在两种情况：1.1.该记录存在该记录存在 2.2.该记录不存在。该记录不存在。因此，下面执行的语句将会根据情况的不同而不同。要解决这个问因此，下面执行的语句将会根据情况的不同而不同。要解决这个问题，我们将引入新的结构题，我们将引入新的结构-分支结构。分支结构。所谓分支结构，是指在程序执行时，根据不同的条件选择执行不同的所谓分支结构，是指在程序执行时，根据不同的条件选择执行不同的程序语句。程序语句。Visual FoxProVisual FoxPro提供了以下提供了以下3 3

32、种分支结构语句：种分支结构语句：o单向分支语句：单向分支语句：IFIFENDIFENDIFo双向分支语句：双向分支语句：IFIFELSEELSEENDIFENDIFo多向分支语句：多向分支语句：DO CASEDO CASEENDCASEENDCASE 现在学习的是第32页，共64页 1单向分支语句单向分支语句【命令】【命令】IF IF ENDIF ENDIF【功能】功能】首先计算首先计算 的值，若其值为真，执行的值，若其值为真，执行 0 IF num0?该数是正数该数是正数 ENDIF ENDIF WAIT WAIT 按任意键结束程序按任意键结束程序 RETURN RETURN【程序说明】程序

33、说明】该程序运行时，要求用户从键盘上输入一个该程序运行时，要求用户从键盘上输入一个 数，然后程序根据所输入的数判断是否大于数，然后程序根据所输入的数判断是否大于0，是的话则，是的话则 执行语句执行语句?“该数是正数该数是正数”，接着顺序执行，接着顺序执行ENDIFENDIF后的语句后的语句 WAIT WAIT按任意键结束程序按任意键结束程序。现在学习的是第34页，共64页【例【例7-9】在学生表（学生在学生表（学生.DBFDBF）中输入学生学号，如果存在则按格中输入学生学号，如果存在则按格式显示该学生的姓名、性别和出生日期、入校成绩，并可对出生日期式显示该学生的姓名、性别和出生日期、入校成绩，

34、并可对出生日期和入校成绩做修改。学生表信息如上图和入校成绩做修改。学生表信息如上图7-107-10所示所示【程序【程序说说明】明】该该程序运行程序运行时时，要求用，要求用户户从从键盘键盘上上输输入学号，然后程序入学号，然后程序根据所根据所输输入的学号在表中入的学号在表中查查找找该该学生。如果找到的学生。如果找到的话话（即函数（即函数found()found()的的值为值为真），就按指定的格式真），就按指定的格式显显示并修改示并修改该该学生的相关信息学生的相关信息 现在学习的是第35页，共64页程序如下程序如下:oSET TALK OFF SET TALK OFF oCLEARCLEARoUSE

35、 USE 学生学生oACCEPT ACCEPT 请输入学生学号请输入学生学号 TO xhTO xhoLOCATE ALL FOR ALLTRIM(LOCATE ALL FOR ALLTRIM(学号学号)=)=xhxhoIF FOUND()IF FOUND()o2,2 SAY*2,2 SAY*显示学生信息显示学生信息*o3,2 3,2 SAY SAY 学生姓名学生姓名:+:+姓名姓名o3,20 3,20 SAY SAY 性别性别:+:+性别性别o4,2 4,2 SAY SAY 出生年月出生年月:GET GET 出生年月出生年月 o4,20 4,20 SAY SAY 入校成绩入校成绩:GET GE

36、T 入校成绩入校成绩o ROW()+1,COL()SAY*ROW()+1,COL()SAY*显示结束显示结束*oREADREADoENDIFENDIFoUSEUSEoSET TALK ONSET TALK ONoRETURNRETURN现在学习的是第36页，共64页2双向分支语句【命令】IF IF 1 ELSE ELSE 2 ENDIF ENDIF【功能】首先计算的值，若其值为真，执行，然后执行ENDIF后面的命令；若其值为假，执行，然后执行ENDIF后面的命令。【说明】双向分支语句的执行流程图如图7-2分支图右边所示。现在学习的是第37页，共64页【例【例7-10】输入一个数，如果大于输入一

37、个数，如果大于0则显示则显示“该数为正该数为正”，否则显示，否则显示“该数该数不为正不为正”。程序如下：。程序如下：INPUT INPUT 请输入一个数请输入一个数 TO numTO numoIF num0IF num0 o?该数是正数该数是正数 oELSEELSEo?“该数不为正该数不为正”oENDIFENDIFoWAIT WAIT 按任意键结束程序按任意键结束程序 oRETURNRETURN【程序说明】程序说明】该程序运行时，要求用户从键盘上输入一个数，然后程序根该程序运行时，要求用户从键盘上输入一个数，然后程序根据所输入的数判断是否大于据所输入的数判断是否大于0 0。是的话则执行语句。是

38、的话则执行语句?“该数是正数该数是正数”；否则；否则执行语句执行语句?“该数不为正该数不为正”。接着都会顺序执行。接着都会顺序执行ENDIFENDIF后的语句后的语句waitwait“按任按任意键结束程序意键结束程序。现在学习的是第38页，共64页【例【例7-11】在学生表（学生在学生表（学生.DBFDBF）中输入学生学号，如果存在则中输入学生学号，如果存在则按格式显示该学生的姓名、性别和出生日期，并将其入校成绩加按格式显示该学生的姓名、性别和出生日期，并将其入校成绩加1010分，否则显示分，否则显示“该学生不存在该学生不存在”。学生表信息如上图。学生表信息如上图7-107-10所示所示【程序

39、说明】【程序说明】该程序运行时，要求用户从键盘上输入待查学生的学该程序运行时，要求用户从键盘上输入待查学生的学号，然后程序根据所输入的学号在表中查找该学生的记录，如果找号，然后程序根据所输入的学号在表中查找该学生的记录，如果找到的话（即：到的话（即：not eof()not eof()的值为真），则按格式显示相应记录并将的值为真），则按格式显示相应记录并将入校成绩增加入校成绩增加1010分；若分；若not eof()not eof()的值为假，表示未找到，显示信的值为假，表示未找到，显示信息息“该学生不存在该学生不存在”。本程序中特别要注意。本程序中特别要注意replacereplace语句的

40、使用。语句的使用。现在学习的是第39页，共64页程序如下：程序如下：oSET TALK OFF SET TALK OFF oCLEARCLEARoUSE USE 学生学生oACCEP ACCEP 请输入学生学号请输入学生学号 TO xhTO xhoLOCATE ALL FOR ALLTRIM(LOCATE ALL FOR ALLTRIM(学号学号)=)=xhxhoIF NOT EOF()IF NOT EOF()o2,2 SAY*2,2 SAY*显示学生信息显示学生信息*o3,2 3,2 SAY SAY 学生姓名学生姓名:GET GET 姓名姓名o3,20 3,20 SAY SAY 性别性别:G

41、ET GET 性别性别o4,2 4,2 SAY SAY 出生年月出生年月:GET GET 出生年月出生年月 o ROW()+1,2 SAY*ROW()+1,2 SAY*显示结束显示结束*oREPLACE REPLACE 入校成绩入校成绩 WITH WITH 入校成绩入校成绩+10 +10 oELSEELSEo?该学生不存在该学生不存在 oENDIFENDIFoUSEUSEoSET TALK ONSET TALK ONoRETURNRETURN 现在学习的是第40页，共64页【例【例7-12】在学生表（学生在学生表（学生.DBF）和成绩表（成绩和成绩表（成绩1.DBF）中查找指定中查找指定学号所

42、对应的该学生，显示其姓名、性别和课程号及成绩四个字段的信息。学号所对应的该学生，显示其姓名、性别和课程号及成绩四个字段的信息。两表信息如图两表信息如图7-11所示所示【程序说明】【程序说明】本例是针对两表查询的例子，所以在进行操作前首先要建立两本例是针对两表查询的例子，所以在进行操作前首先要建立两表的关联，同时要注意该例子是针对一对一关系的情况下编写的。表的关联，同时要注意该例子是针对一对一关系的情况下编写的。图 7-11 学生表和成绩1表内容现在学习的是第41页，共64页程序如下：程序如下：oSELE 1SELE 1oUSE USE 成绩成绩1 1oINDEX ON INDEX ON 学号学

43、号 TAG xhTAG xhoSELE 2SELE 2oUSE USE 学生学生oSET RELATION TO SET RELATION TO 学号学号 INTO AINTO AoACCEP ACCEP 请输入学生学号请输入学生学号 TO xhTO xhoLOCATE ALL FOR ALLTRIM(LOCATE ALL FOR ALLTRIM(学号学号)=)=xhxhoIF FOUND()IF FOUND()o DISP FIELDS DISP FIELDS 姓名姓名,性别性别,A.A.课程号课程号,A.A.成绩成绩oELSEELSEo?该学生不存在该学生不存在 oENDIFENDIFoC

44、LOSE ALLCLOSE ALLoSET TALK ONSET TALK ONoRETURNRETURN现在学习的是第42页，共64页3.分支的嵌套分支的嵌套前面我们已经学习了两个语句即单向分支和双向分支语句的使用。两种分前面我们已经学习了两个语句即单向分支和双向分支语句的使用。两种分支结构中都有命令序列，如果命令序列中又包含支结构中都有命令序列，如果命令序列中又包含ifendif 语句或语句或ifelseendif语句的话，则就是分支的嵌套形式语句的话，则就是分支的嵌套形式【例【例7-13】在学生表（学生在学生表（学生.DBF）中输入学生学号，如果不存在则显示中输入学生学号，如果不存在则显

45、示“该生不存在该生不存在”，否则继续判断是否是，否则继续判断是否是1987年后出生，如果是则显示该条年后出生，如果是则显示该条记录，否则显示记录，否则显示“该生不满足要求该生不满足要求”。学生表信息如上图。学生表信息如上图7-10所示所示【程序说明】【程序说明】本程序是本程序是ififelseelseendifendif语句的两重嵌套，嵌套发生在肯定语句的两重嵌套，嵌套发生在肯定部分。另外，应用分支的嵌套可解决例部分。另外，应用分支的嵌套可解决例7-8中对输入数的三种判断结果中对输入数的三种判断结果即：正数、负数和零，读者可自行思考如何实现。即：正数、负数和零，读者可自行思考如何实现。现在学习

46、的是第43页，共64页程序如下：程序如下：oSET TALK OFF SET TALK OFF oCLEARCLEARoUSE USE 学生学生oACCEP ACCEP 请输入学生学号请输入学生学号 TO xhTO xhoLOCATE ALL FOR ALLTRIM(LOCATE ALL FOR ALLTRIM(学号学号)=)=xhxhoIF FOUND()IF FOUND()o IF YEAR(IF YEAR(出生年月出生年月)1987)1987oDISPLAYDISPLAYo ELSE ELSEo?“该生不满足要求该生不满足要求”o ENDIFoELSE o?“该生不存在该生不存在”oEN

47、DIFENDIFoUSEUSEoSET TALK ONSET TALK ONoRETURNRETURN现在学习的是第44页，共64页4多向分支语句多向分支语句【命令】【命令】DO CASEDO CASE CASE CASE 1 1 CASE CASE 2 2 CASE CASE n n OTHERWISE OTHERWISE n+1 ENDCASE ENDCASE现在学习的是第45页，共64页【功能】功能】系统将依次判断条件表达式是否为真，若某个条件表达式的值为真系统将依次判断条件表达式是否为真，若某个条件表达式的值为真,则执行该则执行该CASECASE段的命令行序列，然后执行段的命令行序列，

48、然后执行ENDCASEENDCASE后面的命令。当所有后面的命令。当所有CASECASE中的中的 值均为假时，如果有值均为假时，如果有OTHERWISEOTHERWISE，则执行则执行 n+1，然后再执行然后再执行ENDCASEENDCASE后面的命令。否则直接执行后面的命令。否则直接执行ENDCASEENDCASE后面的命令。后面的命令。【说明】【说明】DO CASE-ENDCASEDO CASE-ENDCASE必须配对使用，必须配对使用，DO CASEDO CASE与第一个与第一个CASE CASE 之间不应有任何命令。在之间不应有任何命令。在DO CASE-ENDCASEDO CASE-

49、ENDCASE命令中，每次最多只能执行一命令中，每次最多只能执行一个个 。在多个。在多个CASECASE的的 值为真时，只执行第一个值为真时，只执行第一个 值为真的值为真的 ，然后执行，然后执行ENDCASEENDCASE的后面的命令。的后面的命令。现在学习的是第46页，共64页【例【例7-147-14】某公司为了促进销售，采用了购货打折扣的优惠方法，即每位某公司为了促进销售，采用了购货打折扣的优惠方法，即每位顾客一次购货款在顾客一次购货款在300300元以上，给予九五折优惠；购货款在元以上，给予九五折优惠；购货款在600600元以上给予元以上给予九折优惠；购货款在九折优惠；购货款在10001

50、000元以上给予八五折优惠，编程序，根据优惠的条元以上给予八五折优惠，编程序，根据优惠的条件计算每位顾客的应付货款的程序。件计算每位顾客的应付货款的程序。问题分析：问题分析：根据给定的条件，设每位顾客购货款为根据给定的条件，设每位顾客购货款为X，优惠后的应付款为优惠后的应付款为Y，应付款的计算表达式如下：应付款的计算表达式如下：【程序说明】【程序说明】程序运行时，首先从键盘输入每位顾客购货款，并存入程序运行时，首先从键盘输入每位顾客购货款，并存入X X变量中，然变量中，然后依次进行条件判断，当某一条件表达式的逻辑值为真时，就执行下列满足条件的后依次进行条件判断，当某一条件表达式的逻辑值为真时，