07 VFP课件09版 程序设计 6学时

第第7 7章章 程序设计基础程序设计基础第 2 页 共 110 页上一步下一步关 闭目 录 7-1 程序的建立与维护 7-2 程序的流程控制 7-3 顺序结构程序设计 7-4 分支结构程序设计 7-5 循环结构程序设计 本章作业第7章 结构化程序设计第一节程序的建立与维护第 4 页 共 110 页上一步下一步关 闭目 录7-1 程序的建立与维护 Visual FoxPro程序文件，是一个以（.PRG）为扩展名的文本文件。任何可以建立、编辑文本文件的工具，都可以创建和编辑Visual FoxPro程序文件。这些文本编辑工具，可以是Visual FoxPro系统提供的内部编辑器，也可以是其它常用文本编辑软件。在文本编辑环境下，不仅可以对程序文件进行输入和修改，还可以实现字符串查找、替换、删除和编辑功能。第 5 页 共 110 页上一步下一步关 闭目 录7-1-1 用菜单选择方式建立及维护 程序 1.创建与修改程序文件 命令方式MODIFY COMMAND 程序文件名菜单方式 打开“文件”菜单，选择“新建”；在“新建”窗口，选择“程序”，再选择“新建文件”；在“程序文件”编辑窗口，输入程序文件，并保存，此时建立程序文件的操作结束。第 6 页 共 110 页上一步下一步关 闭目 录第 7 页 共 110 页上一步下一步关 闭目 录2.运行程序文件调用程序文件，即运行程 序文件，是程序文件建立的最终 目的。在Visual FoxPro系统中 ，调用程序文件有很多方法，在 这里仅介绍其中两种方法。菜单方式以菜单方式调用程序文件， 操作方法如下：(1）在Visual FoxPro系统 主菜单下，打开“程序”菜单， 选择“运行”。（2）在“运行”窗口，输入 被调用的程序文件名即可。 第 8 页 共 110 页上一步下一步关 闭目 录2.运行程序文件命令方式在Command 窗口中，输入如下命令，则程序文件被调用。DO (程序文件名第 9 页 共 110 页上一步下一步关 闭目 录3维护程序 修改程序文件时，可以从菜单“文件”中选择“打开”命令，从屏幕显示的“打开”对话框中选择要修改的文件，在文件编辑器窗口中进行编辑修改程序。 第 10 页 共 110 页上一步下一步关 闭目 录7-1-2 用命令方式建立及维护程序1创建程序 在在Visual FoxProVisual FoxPro“命令命令”窗口中直接输入命令来建立和运窗口中直接输入命令来建立和运 行程序，更方便简捷。在命令窗口中输入：行程序，更方便简捷。在命令窗口中输入： MODIFY COMMAND > 打开在文本编辑器窗口中，等待用户输入新文件的内容。打开在文本编辑器窗口中，等待用户输入新文件的内容。 第 11 页 共 110 页上一步下一步关 闭目 录2保存程序在编辑过程中，按Ctrl+Q或Esc键，中止程序的编辑，按Ctrl+W键，保存编辑的程序，并返回到“命令”窗口中。程序文件名默认的扩展名为.PRG。如果省略“程序文件名”，系统会自动以“程序1”为程序文件名存盘。 第 12 页 共 110 页上一步下一步关 闭目 录3 3维护程序维护程序在编辑过程中，如果内存空间足够大，可以同在编辑过程中，如果内存空间足够大，可以同时打开多个文本编辑窗口编辑多个文件，在一时打开多个文本编辑窗口编辑多个文件，在一个文件或多个文件之间对文本进行剪切、复制个文件或多个文件之间对文本进行剪切、复制、粘贴等操作。为了便于维护程序和提高编程、粘贴等操作。为了便于维护程序和提高编程效率，系统提供了丰富的编程环境。可以在程效率，系统提供了丰富的编程环境。可以在程序窗口中单击鼠标右键，在弹出的快捷键中选序窗口中单击鼠标右键，在弹出的快捷键中选择所需要的功能命令按钮择所需要的功能命令按钮 。第 13 页 共 110 页上一步下一步关 闭目 录4运行程序在命令窗口中键入：DO（程序文件名）执行一个Visual FoxPro程序，程序文件名前根据需要可以加上路径。如：DO d:VFP程序1该命令可以在命令窗口发出，也可以出现在某个程序文件中，这样就使得一个程序在执行的过程中还可以调用执行另一个程序。当程序被执行时，文件中包含的命令被依次执行，直 到程序执行完毕，或遇到以下命令： 第 14 页 共 110 页上一步下一步关 闭目 录 CANCAL:终止程序运行，清除所有私有变量，返回命令窗口。 DO：转去执行另一个程序。 RETURN：结束当前程序的执行，返回到调用它的上级程序，若无上级程序则返回到命令窗口。 QUIT：退出VFP系统，返回到操作系统。Visual FoxPro程序文件通过编译、连编，可以产生不同的目标代码文件。如果没有对程序进行编译，而且程序中 存在错误，则在执行程序过程中Visual FoxPro会指出程序中存在的错误，出现错误提示对话框。此时，可以取消操作 ，中止程序的运行，修改后再运行。 第 15 页 共 110 页上一步下一步关 闭目 录在运行程序时，系统提供了两种方式：先编译后执行和一边编译一边执行。先编译后执行是在编辑窗口打开要编译的程序，然后在菜单“程序”中选定“编译”。我们下章要讲到的菜单程序就是要先编译后执行的程序。7-1-3 程序的编译第 16 页 共 110 页上一步下一步关 闭目 录7-1-4 编程时的一般规则1.每行只能写一条命令，每条命令以回车换行作为结束标志；2. 命令一行写不下时，可以分多行输入，在未输入完的数据后加分号，然后回车换行，系统会把此行作为前一行的续行；3.“*”，“ X=3 ; ?X ?XX = THISFORM.TEXT1.VALUE THISFORM.TEXT1.VALUE=X第 27 页 共 110 页上一步下一步关 闭目 录程序设计三要素：输入语句: INPUT TO X ; X=3X=THISFORM.TEXT1.VALUE 计算和处理语句：S = A + B输出语句 ： ?”S=” ,STHISFORM.TEXT1.VALUE = S 第 28 页 共 110 页上一步下一步关 闭目 录程序的3种基本结构任何一种计算机语言程序主体是由3种基本结构组成：顺序结构、选择结构和循环结构。顺序结构顺序结构 循环结构循环结构选择结构选择结构第 29 页 共 110 页上一步下一步关 闭目 录分支结构的三种类型 （单边、双边、多边）条件命令序列ENDIF后命令NY条件真假语句 序列1语句 序列2条件条件1 1语句语句 序列序列1 1条件条件n n。语句语句 序列序列n nOTHERWISEOTHERWISEy yN NN Ny y第 30 页 共 110 页上一步下一步关 闭目 录循环结构的三种类型当型循环DO WHILE-ENDDOFOR-NEXT循环库文件循环SCAN-ENDSCAN多重循环第三节顺序结构程序设计 第 32 页 共 110 页上一步下一步关 闭目 录7-2-1 顺序结构在结构化程序设计方法中，程序基本控制结构有三种，即顺序结构、分支结构和循环结构。顺序结构是一种线形结构，是最基本的程序结构，它是按照命令或语句的排列顺序，依次执行。 第 33 页 共 110 页上一步下一步关 闭目 录作业61 阅读顺序结构程序请阅读以下程序并在纸上写下运行结果，上机验证其输出结果，并把它写入源程序作业61-1.PRG作业61-6.PRG中。第 34 页 共 110 页上一步下一步关 闭目 录*作业61-1.PRGX1=21X2=X1+12?X1,X2X1=X1+X2X2=X2-X1?X1,X2x1x22121333321 33 54 12第 35 页 共 110 页上一步下一步关 闭目 录*作业61-2.PRGA1=10A1=23?A1A1=A1*10A1=A1-30?A1A1101023 200第 36 页 共 110 页上一步下一步关 闭目 录*作业61-3.PRGX=1X=X+1X=X+1?'X=',Xx1 1X= 3第 37 页 共 110 页上一步下一步关 闭目 录*作业61-4.PRGA=10B=A*10B=B/A+A?'B=',BAB1010100100B= 20第 38 页 共 110 页上一步下一步关 闭目 录*作业61-5.PRGDIME A(4)A=1A(2)=A(1)+1A(3)=A(3)+A(1)A(4)=A(4)+A(3)+A(2)?A(1),A(2),A(3),A(4)A1A1A2A2A3A3A4A4一维数组一维数组A A12131 2 1 3第 39 页 共 110 页上一步下一步关 闭目 录*作业61-6.PRGDIME B(2,2)B=23B(3)=11B(2,2)=.T.B(1)=DATE()?B(1,1),B(2),B(2,1),B(4)B(2,1)B(2,1) B(2,2)B(2,2)B(1,1)B(1,1) B(1,2)B(1,2)二维数组二维数组B B23232323第 40 页 共 110 页上一步下一步关 闭目 录作业62 编写顺序结构程序请编写以下程序，并把它写入源程序作业62-1.PRG - 作业62-6.PRG文件名存盘。1、已知变量A=21、B=3，计算S=A*B。2、已知长方形的长和宽分别为17、8，计算长方形的面积和周长。 3、已知变量X、Y、Z的值为10，12，15，计算S=(X+Y)/(Z-X)。4、已知圆的半径R=5，圆柱高H=15，计算圆面积、圆周长、圆球体积、圆柱体积 5、计算由键盘输入的任意三个数之和。 第 41 页 共 110 页上一步下一步关 闭目 录&&作业62-1.PRGCLEA?'已知变量A=21、B=3，计算S=A*B。'A=21B=3S=A*B?'S=',ScancalAB21213 3S= 63S6363第 42 页 共 110 页上一步下一步关 闭目 录&&作业62-2 计算长方形的面积和周长.PRGCLEA?'已知长方形的长和宽分别为17、8，计算长方形的面积和周长。'X=17Y=8MJ=X*YZC=X*2+Y*2?'长方形面积= ',MJ?'长方形周长= ',ZC第 43 页 共 110 页上一步下一步关 闭目 录&&作业62-3.PRGCLEA?'已知变量X、Y、Z的值为10，12，15，计算S=(X+Y)/(Z-X)。'X=10Y=12Z=15S=(X+Y)/(Z-X)?'S=',S第 44 页 共 110 页上一步下一步关 闭目 录&&作业62-4 计算圆面积、圆周长、圆球体积、圆柱体积.PRG CLEA ?'已知圆的半径R=5，圆柱高H=15，计算圆面积、圆周长、圆 球体积、圆柱体积. ' R=5 H=15 YMJ=R*R*3.1416 YZC=2*3.1416*R QTJ=4/3*3.1416*R3 YVT=R*R*3.1416*H ?'圆面积=',YMJ ?'圆周长=',YZC ?'圆球体积=',QTJ ?'圆柱体积=',YVT第 45 页 共 110 页上一步下一步关 闭目 录&&作业62-5 计算由键盘输入的任意三个数之和.PRGCLEA?'计算由键盘输入的任意三个数之和。' INPUT “请输入第一个数A：“TO a INPUT “请输入第一个数B：“TO BINPUT “请输入第一个数C：“TO CS = A+B+C?“S=“,SINPUT命令除输入数值型数据 外，其他几种类型