VFP第6章 程序设计基础

DO WHILE <条件> …… EXIT …… ENDDO
DO WHILE <条件> …… LOOP …… ENDDO
EXIT与LOOP的作用
(3)EXIT语句的一个典型应用 EXIT语句常用在下列控制结构中，用于控制循环次数不确定时的 循环退出。 DO WHILE .T. &&循环条件为永真，常称为永真循环 <语句序列（含修改某条件语句)> IF <条件> EXIT ENDIF ENDDO
作业 :书本P161 三.操作题 2（参考学习指导书Ｐ８７ ３）
6.5 循环结构
循环结构是指根据指定条件的当前值 来决定一行或多行语句（命令）是否要重 复执行。VFP6.0提供了三种循环结构。 1. DO WHILE循环 (1)DO WHILE循环结构 (1)格式 DO WHILE <条件> <循环体语句序列> ENDDO (2)功能 执行DO WHILE语句时，首先计算判 断条件的值，若条件的值为真，则顺序执 行循环体，然后再返回到do while，再次 计算判断条件的值，若条件为真，则重复 上述过程；若条件为假，则执行enddo的 下一个语句。 (3)注意：do while与enddo必须成对出现； 防止死循环
2.程序文件的保存 程序输入完毕后，从 “文件”菜单选择“保存”或按CTRL+W保 存程序文件。 3.程序文件的修改 方法1)若程序文件已建在某一项目中，则从项目管理器中选定它 并单击“修改”按钮。 方法2)从“文件”菜单选择“打开”， 或者单击常用工具栏上的 “打开”按钮，在“打开”对话框选定要修改的程序文件后单击“确 定”按钮。 方法3)在命令窗口中执行:MODIFY COMMAND ＜程序文件名＞ 4.程序文件的运行 方法1)若程序文件已建在某一项目中，则从“项目管理器”中选 定它并单击“运行”按钮。 方法2)从“程序”菜单中选择“运行”，选定要运行的程序文件 后单击“运行”按钮。 方法3)在命令窗口中执行命令：DO ＜程序文件名＞
讲解书本例6.15
wenku.baidu.com
2.FOR循环 (1)格式 FOR <循环变量>=< 初值> TO <终值> [STEP <步长>] <循环体语句序列 > ENDFOR/NEXT (2)功能 对于循环变量在初 值和终值之间的每一个 值，重复执行FOR与 ENDFOR(或NEXT)之 间的语句序列。 （3）用处：当预先知道 循环次数，或在循环中 有变量在某值域内递增 或递减时
FOR循环流程图
例:统计1~50间不能被7整除的数的个数，并求这些数的积。 clear num=0 fact=1 for i=1 to 50 step 1 if mod(I,7) !=0 num=num+1 fact=fact*I endif endfor ? “1~50间不能被7整除的数的个数是”,num ? “它们的连乘积是”,fact
例6.7 编程显示下列三角形图案 * *** ***** 程序： clear ? “ *” ?” ***” ?”*****” return 作业： 编程显示下列平行四边形图案： ***** ***** *****
4.注释 (1)注释语句 1)格式 */NOTE <注释内容> 2)功能 注释语句是非执行语句，它们不对计算机产生任何操 作,• 仅对程序起注解作用。 仅 (2)行末注释 行末注释用在语句（命令）末尾，以“&&”起头，后 跟本行的注释内容。
DO WHILE循环流程图
例:计算自然数1~100的和。 S=0 &&存放累加和的变量S初值为0 N=1 &&取第一个自然数 DO WHILE N<=100 S=S+N &&累加当前自然数 N=N+1 &&取下一个自然数 ENDDO ?S RETURN 作业：编写一程序，计算自然数1~100的奇数和。
例:从键盘接收两个数， 在屏幕输出大数。 INPUT "X=" TO X INPUT "Y=" TO Y IF X<Y &&如果X<Y, 把X与Y交换 T=X &&引入第三 个变量T,进行三角交换 X=Y Y=T ENDIF ?X RETURN
2.双分支选择结构 (1)格式 IF <条件> <语句序列1> ELSE <语句序列2> ENDIF (2)功能: 双分支选择结构流程图 程序执行时，先判断条件的 值是否为真, 然后决定程序 运行的走向。 (3)P133 提示
6.3 顺序结构程序设计
1.顺序结构 程序运行时，按照命令（语句）的排列顺序逐条执行，这种结构 就称为顺序结构。 2.简单的输入输出语句 (1)数据输入语句:INPUT 1)格式: INPUT [<提示信息>] TO <内存变量名> 2)功能:暂停程序运行，显示提示信息，等待用户从键盘上输入数 据，用户可以输入任意合法的表达式。 例6.4 运行下段程序： input “请输入一个数字：” to a1 input “请输入一个字符串：” to b1 (4)简单输出语句：？、?? 1)格式:?/?? <表达式表>
最常用的流程图符号如下所示：
半圆框称为起止框，用来表示程序的开始和结束； 矩形框称为处理框，用来表示数据的输入、输出及加工等问题； 菱形框称为判断框，用来表示条件判断； 箭头即指向线，用来表示程序的流向或途径。
S：存储每次累加的 部分和，n：表示每 次应加的数
计算1＋2＋3＋……＋100。 的流程图
条件2
条件n
语句序列2
语句序列n
语句序列n+1
ENDCASE的下一语句
多分支选择结构流程图
例:当输入0~6之间的整数时，系统便显示星期日、星期一……星期六的英语单词，否则 显示“输入数据出错”的信息，试编程实现之。 clear input “请输入一个整数” to n do case case n=0 ? “Sunday” case n=1 ? “Monday” case n=2 ? “Tuesday” case n=3 ? “Wednesday” case n=4 ? “Thursday” case n=5 ? “Friday” case n=6 ? “Saturday” otherwise ? “输入数据出错” endcase retu
例: 从键盘输入若干个非零的数值，当输入数值“0”时结束输入， 统计有效数值的个数和它们的平均值。 CLEAR S=0 &&存放累加和 N=0 &&存放数值个数 DO WHILE .T. &&这是一个永真循环 INPUT "请输入一个数值，[输入零时结束]" TO SZ IF SZ=0 EXIT ENDIF S=S+SZ N=N+1 ENDDO ? "共输入有效数值个数:",N ? "平均值是:",S/N RETURN
6.1 程序文件的建立与运行
1.程序文件的概念 程序是为实现某一具体任务而按照一定的控制结构编制的命令序 列。将程序以文件的形式存储在磁盘上，这种文件称为“程序文 件”。 程序一般由以下要素组成: (1)变量：参与运算，用于记录、存储程序的中间及最终结果。 (2)普通语句：操作数据库的命令（含SQL命令)和专用于程序设 计的输入输出等语句。 (3)程序流程语句：控制程序走向的语句，如选择、循环等。 (4)过程与函数：完成特定功能或计算的子程序模块。 2.程序文件的建立与编辑 三种建立方法: 1)从项目管理器新建程序文件 2)从“文件”菜单新建程序文件。 3)在命令窗口中执行命令:MODIFY COMMAND <程序文件名>
作业：统计1~50间能被6整除的数的个数，并求这些数的和。
3.SCAN循环 SCAN循环专用于控制对 数据表中记录进行逐条操作。 (1)格式 SCAN [<范围>] [FOR/WHILE <条件>] <循环体语句序列> ENDSCAN (2)功能 针对当前表中指定范围 内满足条件的每条记录，逐 一执行SCAN与ENDSCAN 之间的语句序列。
例6.6: MESSAGEBOX函数举例
MESSAGEBOX函数举例
MESSAGEBOX(“欢迎使用本系统！”)
对话框图示
MESSAGEBOX(“删除记录？”,1+48+256)
MESSAGEBOX(“继续执行吗？”,3,”请确认”)
3.环境设置语句 (1)清屏语句：CLEAR 1)格式:CLEAR 2)功能:清空屏幕或当前窗口中显示的内容。 (2)环境设置语句：SET 设置系统环境和状态的语句为 SET语句，SET语句实际上是一个语句组， 分为两种格式： 格式Ⅰ SET <参数> ON/OFF 格式Ⅱ SET <参数> TO <参数值> 常用的几个SET语句: (1) SET DEFAULT TO <路径> 功能：设置默认的工作目录。 (2) SET PATH TO <路径> 功能：设置搜索路径。 (3) SET TALK ON/OFF 功能:控制是否使某些命令产生屏幕显示（P131提 示） (4) SET PRINT ON/OFF 功能：控制屏幕上的输出内容是否同时送打印机打 印。
2)功能:依次计算并显示表达式表中各表达式的值，所 显示的值与值之间间隔一个空格。 例6.5 运行下段程序 input “a=?” to a ? A*5,a+8 (5) 信息显示函数: MESSAGEBOX( ) 1)格式: MESSAGEBOX(<提示信息>[,<按钮类型>][,< 对话框标题>]) 2)功能:暂停程序运行，在对话框中显示提示信息，等 待用户单击按钮，并返回一个整数表示单击的是哪个按钮。 <按钮类型>由三个数码相加产生，即: <按钮类型码 >+<图标类型码>+<默认按钮码>
(2)循环体中两条特殊语 句：EXIT和LOOP (1)格式 跳出循环语句：EXIT 短跳循环语句:LOOP (2)功能 在循环体中执行到 EXIT时，立即无条件跳出 循环，转去执行 ENDDO 的后一个语句。若执行到 LOOP语句，则立即返回 DO WHILE重判循环条件， 而不再执行循环体内的其 他语句。
例6.1 请编写一程序文件，名为：学生人数.prg，实现统计student表中奖学金在 200—300元之间的学生人数，并与书中例5.4（p88)进行比较。
6.2 结构化程序设计初步
1.算法及流程图 (1)算法的概念:根据问题要求拟定用计算机求解的策 略和步骤，并把它用某种工具描述出来，称之为“算法设 计”。 (2)算法的流程图描述 :用一些简单的几何框图表示各 种类型的操作，然后用带箭头的有向流线将各个框图连结 起来，以表示其执行的先后顺序，这种框图称为“流程 图”。 例6.2 试写出算法，以交换变量x 和y的值。 例6.3 试画出流程图，以计算自然数1—100的和。 （如下图） 2.结构化程序设计方法 结构化程序指整个程序由顺序、选择、循环三种基本 结构组成。
第六章 程序设计基础
在前面的章节中介绍了基本的数据库管理操作命令，它 们基本上都是以单个命令方式来实现的，这种交互方式虽 然简单，但对于某些经常执行的操作，需要反复地输入命 令再执行，工作量大、效率低。为解决以上问题，可采用 vf提供的程序方式。 Vf程序设计包括面向过程程序设计和面向对象程序设计， 前者是后者的基础。
是
条件为真 语句序列1
否
语句序列2
ENDIF的下一语句
双分支选择结构流程图
例:请用双分支选择结构完成上例。 input “x=?” to x input “y=?” to y if x>y ? “最大数是：”，x else ? “最大数是：”, y endif retu
3.多分支选择结构 (1)格式： 条件1 DO CASE CASE <条件1> 语句序列1 <语句序列1> CASE <条件2> <语句序列2> …… CASE <条件n> <语句序列n> [OTHERWISE <语句序列n+1>] ENDCASE (2)功能：执行该语句，系统依次检查每 一个CASE中条件的值,视其真假决定 程序的走向。P135功能说明及提示
6.4 程序的选择结构
选择结构是指在程序执行 过程中，根据指定条件的当前 值在两条或多条程序路径中选 择一条执行。通常选择结构有 三种形式。 1.单分支选择结构 (1)格式 IF <条件> <语句序列> ENDIF (2)功能:执行该语句,先判断 条件的值是否为真,然后决定 程序运行的走向。 (3)注意：成对出现。 （P133提示）