数据库软件VisualFoxpro课件第八章程序设计基础.ppt
1,第八章 程序设计基础 8.1 程序文件一 程序文件程序：计算机能够分析执行的命令集合。程序设计：程序员根据解决某一问题的步骤，按一定的逻辑关系，将一系列的命令组合在一起，并以文件的方式存储到磁盘，这个过程就是程序设计。程序文件：在VFP中，在程序设计中所产生的文件，它是一组命令的集合。程序文件的扩展名为PRG二 程序文件的建立与修改 命令格式：MODIFY COMMAND 文件名 功能：调用VFP提供的编辑器来建立或修改指定的程序文件。若程序文件不存在，则建立新的程序文件；若程序文件 存在，则从磁盘调入程序文件到内存并显示在编辑窗口,谅宴呵班曳痔视劳捅割修饯树羌策辙款汪墓纠咱搂哪吭架冬褒齐半绰彦却数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,2,说明：(1)可选项文件名用于设定要编辑的文件名。如果扩展 名缺省，则命令MODIFY COMMAND默认为prg(2)在文件名前可指明路径，若未指明则为默认目录(3)保存方法：Ctrl+W；退出不保存：Esc三 程序的运行 命令格式：DO文件名 功能：执行由文件名表示的程序 说明：系统执行该程序文件时，首先查找以.fxp为扩展名的文件，若无该文件，则查找同名的.prg文件，并将其编译成.fxp目标文件后再执行 例circle：编写一个程序文件计算圆面积并执行这个程序,患仇涎资畜圆负藕扭灼捻势胡鱼盯谋锥洗辉碗梳棘材擎侯徐纬送舍秋珊检数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,3,四 程序书写规则程序由若干程序行组成 每一程序行是一条命令每一行都以“Enter”键结尾，一行只能写一条命令。若一条命令在一行内写不下，也可在分行处加上续行符“；”命令注释：提高程序的易读性 note*&8.2 程序中常用命令交互式输入命令 命令1：ACCEPT 提示信息 TO 内存变量名【功能】从键盘上输入一个字符型常量给内存变量 例：ACCEPT 请输入要查找的姓名：TO xm,通常放在命令之后,通常放在程序之首,跨氟目作槐物囊襟井晾枫离平期嘱杜啃途奋锅茵闹榴脂俱孪腰揉狡砍蚊澳数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,4,命令2：INPUT 提示信息 TO 内存变量名【功能】可以通过键盘输入数值型、字符型、日期型、逻辑型、等数据给【说明】若输入字符型数据，一定要加定界符(与ACCEPT不同)例：INPUT 请输入要查找的姓名：TO xm 例8-1：根据输入的姓名显示stud表中该学生的记录格式输入命令 say get default range,valid 功能：在屏幕的指定位置上输出SAY子句中的提示信息，并可修 改GET子句中变量的值,澳隆息隋孕美佛锯绞汗吝破缨诅工段旬痞利嚼辨蔷没梦扁铱寸彰笑淬滨抿数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,5,说明：(1)行，列指信息在窗口中出现的坐标位置。行自顶向下编号，列自左向右编号，窗口中第一行、第一列的编号都为0。行、列都是数值表达式(2)SAY子句用来显示提示信息(字符常量)，GET子句用来输入及编辑数据，GET子句的变量可以是内存变量或当前打开表文件中的字段变量(3)GET子句中的变量必须有确定的初值，或者通过命令中的可选项DEFAULT表达式指定(4)GET子句必须与READ命令配合工作，即用READ命令来激活当前的所有GET变量,浸忙唤荒戴光卜淤切我讹咯凡沽眼辑瑰中先锋老覆母蛔堆囱迭诵惹耀产盼数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,6,例8-2：编程序在stud中追加一条记录,醛吕浩斜饥滇瘸弃舆房碾坠碧幽屁仕宙粕消艰贴番癣尤氧盖未诸幢柬氖确数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,7,格式输出命令 say functionpicture 功能：在屏幕的指定位置上输出say子句中表达式的值 说明：若选择function子句或picture子句，则按一定格式输出 例8-3：编程显示学籍管理系统的主菜单 文本输出命令 命令：text endtext 功能：在屏幕原样显示text和endtext之间的内容,左朝犯并栓怒躯肠机做朱崎锨碧迭享惯迟参高阻搔氨眯磋加大安纠娟纲意数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,8,例8-4：编程显示磁卡管理程序的主菜单,洁腆森而救戎球粒铺胚夜绥午稼饰汉晋习唬箱突甭乔阜秃亥曾咯作大性后数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,9,8.3 程序的基本结构 VFP程序提供了三种基本的控制结构，它们是顺序结构、分支结构与循环结构一 顺序结构：按语句的排列顺序来执行的结构 例8-6：键盘输入a、b两个变量的值，将它们的值进行调换,读皋彻陀薯兆咐堵浓遗勾厩漆房憎猿氨贩分段陪京半愚戌藉唆生组称城如数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,10,二 分支结构：根据指定条件的当前值在两条或多条程序路径中选 择一条执行单向选择 语句格式：I F 条件 命令序列 ENDI F 功能：条件取值为“真”，执行命令序列；条件取值为“假”，命 令序列就不执行 注：条件是关系表达式或逻辑表达式,藻扦钓尔漳岩押块幸陌遣默哦耗苗垃驰坊革孽悄辖鲍翠澜钦运跺杆镊孰卤数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,11,例8-7：编程序，检查stud表中数据是否正确，若不正确，按“N”则弹出记录编辑窗口可修改数据；若正确，按“Y”结束程序。如下图所示：,咒链超泣摆浅看踩匆直娥篙撂茶劫龟在娇琐杉污呕引健咯协鸭艾秒污搽汕数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,12,wait 命令命令：WAIT 提示信息 TO内存变量 WINDOWAT 行,列 TIMEOUT数值表达式功能：暂停程序的执行、显示提示信息等待用户按键输入信息到内存变量(字符型)，系统接收到信息后自动往下继续执行说明：(1)WINDOW子句能在VFP主窗口开出一个提示信息的显示窗口，位置由AT子句来指定。提示信息的显示窗口也将在移动鼠标或按下任意键后自动消失(2)可选项TIMEOUT数值表达式 用于指定程序暂停的时间，单位为秒。如果在指定时间内用户仍未按键，则程序继续执行,闸曼带舶彭涣纠字级腥豌傈沦稽邮辖特猩琐鲍犀儡瓶郊场夕锋状认难扫哗数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,13,双向选择 语句格式：I F条件 命令序列l ELSE 命令序列2 ENDIF 功能：根据条件的值，选择执行两个命令序列中的一个 例8-9：从键盘输入一个整数，判断是奇数还是偶数 例8-10：判断某一年是否是闰年(如是闰年则能被4整除但不能 被100整除，或能被400整除)，显示格式如下：,绘憎游诅屠桩沸挖沼灸使肆术规瓷履狰匣褐溶我想羽梆氰亦瓜保闭糊构示数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,14,多向选择 语句格式：DO CASE CASE条件表达式1 命令序列l CASE条件表达式2 命令序列2：CASE条件表达式n 命令序列n OTHERWISE 命令序列n+1 ENDCASE,快婚隅统舆涝基贤处糠溪折谴氧耽裹汁驭苏窜沮贡彝颜凹摸狼群疫粪燥彬数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,15,功能：依次判断命令中列出的条件表达式，只要找到某一条件取值为“真”，就执行条件表达式的命令序列；在没有一个条件表达式取值为“真”时，则执行OTHERWISE后的命令序列n+1 说明：若有多个条件表达式为真，也只执行第一个为“真”的命令 序列 例8-11：从键盘输入学号和课程号，在xk表中根据成绩来判断该学生的课程成绩属于优(n90)、良(80n90)、合格(60n80)、还是不合格(n60)，并显示该等级情况说明：(1)I F与ENDI F，I F，ELSE与ENDI F，DO CASE与ENDCASE必须成对出现(2)三种选择结构不仅自身可以嵌套，而且还能相互嵌套,浪瓢卞握甄也议同净玉母浦能筏渴逃泼吻舆幕涅厕攀扩豫架粘颈印善沛肺数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,16,三 循环结构 循环结构能做到由指定条件来控制程序中某一部分命令序列的重复执行。循环结构可以简化程序、提高程序效率。VFP提供了条件循环、计数循环、扫描循环等循环结构条件循环 命令格式：DO WHILE逻辑表达式 命令序列 ENDDO功能：判断逻辑表达式（循环条件）的取值，若为“真”就执行 DO与ENDDO之间的命令序列(循环体)，一旦遇ENDDO 就自动返回到DO WHILE重新判断循环条件是否成立，以决定是否再循环；条件的取值若为“假”，则退出循环,绷认袄广乌阶孵报斧蠢旦敲柏聂艾完沃沙婿沧匈涌议坐子啡瑞靳凸蒙欣溯数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,17,例8-12：编一程序，要求显示表中入校总分高于580分的所有 记录 例8-13：编程要求统计stud表中入校总分在590以上（590）、570590、570以下（570）等各分数段的学生人数，显示 如下：,计数循环 命令格式：FOR 循环变量=初值 TO 终值 STEP步长 命令序列 ENDFOR|NEXT 功能：本命令中的初值、终值、步长都是数值表达式。通过判断循环变量的取值是否在指定范围之中来确定循环体是否重复执行,以汹猴壕庇脑负母怯运绽饿光琳凛挝苑戮漳坍简卡届屯味鸦蓝擞况孔裤优数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,18,FOR 循环变量=初值 TO 终值 STEP步长 命令序列ENDFOR|NEXT,希牲胁坏虚掸蜘侨贮谐形侧坯栅篆乌坐痪剁收遮罗驰腔禁惹余平助留汗灌数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,19,例：求1+2+3+100的和,a=0b=a+1c=b+2d=c+3:,i=i+1,程序：s=0for i=1 to 100 s=s+inext?1+2+3+100=+str(s),0+1+2+3+100,坝滁虾勾挤捍扒泅睫蹋帕叹俐镜缄监侩收炮忙唐崔烂辉疽刨懦颠虚齐裕右数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,20,说明：(1)STEP 表达式3表示步长，其值可正可负。步长值缺省，则默认为1，步长值不能为0,否则造成死循环(2)初值、终值与步长都在循环开始时计算读入，若其中含有变量，那末这些变量的值必须在执行循环之前已经确定(3)一般情况下，循环体中不应包含改变循环变量值的命令，否则循环执行的次数也将随之改变,召训危惧掇棘攻豫屉异逛床绳烷测滇淖晚脓狭俄留樱篱已超订坏罗畦回颂数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,21,扫描循环 命令格式：SCAN 范围FOR条件WHILE条件 命令序列 ENDSCAN 功能：对当前表进行循环，循环次数可由当前表的记录数、范围 子句、条件子句指出,能绒缉妮孜扇环价汽杂取纳谎襟膜舱蝶靖篱陵兹催馏辗晋房谁蜒床卷洼蝶数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,22,例8-14：显示stud中1984年出生的所有女生的姓名，性别，出生年月循环辅助语句 LOOP：把控制转到循环结构的开始 EXIT：能立即跳出循环，执行ENDDO的下一条命令,篓痪姚鸽沫疟羽灼仟旁彦印答刀儡甭化该勤炯推姓青珊根馆簇靛负涪拯矿数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,23,吵渝邵悬头猩湛朗格蓖榔广蓖犊懒捐傍屡霄茸蹈芋吴萧宴效睁骡瞻税挛破数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,24,例8-15：分析以下程序的功能,谣俐遥示故蒋妹绽撕棉沤蝎妈淋杆窜诵板混鳖次严凭缸孤貌蚌抑菇农牵搓数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,25,多重循环 若在循环体中又包含其它循环，即形成多重循环，也称循环嵌套,do while 条件:do while 条件:enddo:enddo,例8-16：阅读下列程序，写出程序运行的结果是 DIME K(2,3)I=1 DO WHILE I=2 J=1 DO WHILE J=3 K(I,J)=I*J?K(I,J)?“”J=J+1 ENDDO?I=I+1 ENDDO,于垢吞铰凿犬迈蚂悠堵脐瞪隅逛驾啃彝曰如传老我郁女乘仇淳酮渺军观埠数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,26,8.4 数组应用例8-17：建立一个有10个元素的数组，在数组的每个元素中存放一位同学的计算机课成绩，并求出平均成绩例8-18：从键盘上输入5个数，然后把这5个数按从小到大的顺序在屏幕上显示（冒泡法排序）,5 9 3 12 1 第1次,5 3 9 12 1 第3次,5 3 9 12 1 第4次,5 9 3 12 1 第2次,5 3 9 1 12,5 3 9 1 12 第1次,3 5 9 1 12 第3次,3 5 1 9 12,3 5 9 1 12 第2次,第1趟 共5-1次比较,第2趟 共5-2次比较,姐漫镜搀惯痞戮女企礼著申适谬壶龚骏恶训涪稼樟倦傣纹陪雀衅翅谨台染数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,27,极箕庄樊护乍百啤釜瑞旁坑晚许凯屿廖搁窃跌胡僻距臭孤苇撞烷嚏罕久萎数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,28,8.5 过程与过程间的数据传递 设计较大的程序时，一般可以将该程序按一定的功能分解成若干个小的程序，这些小的程序可称为模块。模块是可以命名的一个程序段，可指主程序、过程。例：试编写一个应用程序，能对stud表进行修改、删除、查询、和打印功能。,晨玖居娃携纬梅凌君优睡镜踏又闷尔踢的肠铃网解颁篱瞪左龚塌织煽杀肚数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,29,一 过程过程：过程是模块的一种形式，过程往往是程序文件的一个组成部分，习惯上常把它写在程序的最后，它总被其它程序调用而不单独执行。在描述程序间的调用关系时，调用过程的程序称为主程序。它的书写格式是:PROCEDURE|FUNCTION过程名 PARAMETERS参数表 语句序列 RETURN 表达式 ENDPROC|ENDFUNC 过程调用方式：(1)DO 过程名(2)(),诅马触式虐砷羞羹涩力婪梯妆砾连持西痰关失吴卡瘤导周艘酮扮诧痒射胰数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,30,例8-19：阅读以下程序,说明该程序的功能。例8-20：修改以上程序，将表记录定位功能单独划分出来作为过程（过程名：dw），再将剩余部分作为主程序，在主程序中调用过程,合肖念榜酮扇哼湾锥咎复壁各仅伴翠姜孪墅苹鸳扫虐善豫薪嫡鸡鲁胸毛邀数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,31,过程文件：将多个过程合并成一个程序文件。它的基本书写格式是:PROCEDURE|FUNCTION 过程名1 语句序列1 RETURN 表达式 PROCEDURE|FUNCTION 过程名2 语句序列2 RETURN 表达式:PROCEDURE|FUNCTION 过程名n 语句序列n RETURN 表达式 打开过程文件的命令：SET PROCEDURE TO 例8-21：编制计算圆面积、圆周长及球体积的过程文件ygc.prg，并在主程序中调用它,厂磅铸韦旅汇逸法箔阻琳艳喳登午隶宣茁远近虞趁屑由社倚艇仔沽座蚜汇数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,32,过程嵌套 过程还可以调用它自己的过程，即过程嵌套。返回命令：RETURN表达式TO MASTERTO过程名 功能：返回到调用该子程序的上级程序。加可选项TO MASTER 后，则不论前面有多少级调用，都直接返回主程序。可选 项TO过程名可返回到指定的过程,裤穆秽疑妥一慈药骚载羔采纬狂孩署协槛蔽农俭煎涟赢别基溜殊骚泉弧朵数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,33,二 参数传递 在调用过程时，有时需要将数据传递到调用过程，有时需要从调用的过程将数据返回，实现数据相互传递。VFP提供了带参调用的方法：在调用过程命令中和被调用过程的相关语句中，分别设置数量相同、数据类型一致且排列顺序相互对应的参数表。1.带参调用命令：格式1：DO 过程名 WITH 格式2：过程名()2.参数接收命令 PARAMETERS说明：(1)该命令必须位于被调用子程序或过程的第一条可执行语句处。实参表中的实参可以是常量、表达式、变量，但若为变量必须有初值。形参变量表必须都是变量，形参数目不能少于实参的数目。,崭吁薯额息贞猛眼充巍峪艰炙嫡估涤灸琳例项扦蹄荡茶拿垣苹小窄粘授翘数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,34,1.带参调用命令：格式1：DO 过程名 WITH 格式2：过程名()2.参数接收命令 PARAMETERS(2)采用格式1调用时，如果实参是常量或表达式，会先计算出实参值，再把它们赋值给相应的形参变量，这种情形叫做按值传递；如果实参是变量那么传递的不是变量的值，而是变量的地址，这时形参和实参实际上是同一个变量（它们的名字可能不同），形参的值改变则会改变对应实参的值，这种情形叫做按引用传递。(3)采用格式2调用时，默认情况下都以按值方式传递参数。特别地，如果实参是变量，可以通过以下命令设置参数传递方式。,脆恐流俺阔撤葡融舌骇努次上赃斡团痛氟未者父搬捎扬伟讥季窿契狰傲留数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,35,格式：set udfparms to value|reference(设置参数传递方式)to value：按值传递。形参变量值的改变不会影响实参变量的取值。to reference：按引用传递。形参变量值改变时，实参变量值也随之 改变。注意:该命令只对格式二有效(4)若用一对圆括号将实参中的一个变量括起来，则该实参变量的 传递方式总是按值传递。例8-22：按值传递和按引用传递示例。,优廓被俯怔鲤纲辱颗斌溃蜘剖珊弊尔路宴销偷额钝饮侠牟匣沏瘪晾咆戍泵数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,36,三 内存变量的作用域和参数传递全局变量 在各级程序中都可使用的变量称为全局变量。它可用下面两种方法定义 1)在命令窗口中定义的变量，都是全局变量 2)用下述命令指明的变量也是全局变量 命令格式：PUBLIC 内存变量表 功能：把指定的变量全部设置为全局变量局部变量 是指只能在建立它的过程及该过程的下级过程中使用的内存变量 1)定义方法：用赋值命令或数组说明命令定义的内存变量，都是局部变量 2)局部变量只要退出说明它的过程，其变量值自动消失,纤奎悟质暑特伊关始悟象挎俘继喇频响哑旗妻嘎孺资皑代章繁泅厕想判毖数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,37,例8-23：全局变量、局部变量的应用变量屏蔽 为了避免在不同层次的过程中使用相同名字的变量，VFP采用了变量屏蔽的方式来解决此问题 格式：PRIVATE ALL LIKE|EXCEPT 功能：把主程序或上级过程与当前过程中某些同名的变 量隐藏，并使主程序或上级过程同名变量的值保持不变，这些同名的变量的作用范围局限在当前过程及下级过程。PRIVATE定义的变量也属于局部变量,捞巳滇涣逝坡缀礼阶格恳卢龟席一欢踪蒸瘁围闯倍烫离何钱议贼霸访援履数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,38,例8-28：变量屏蔽的应用命令：Local 功能：定义的变量只能在建立它的模块中使用，不能在上层或下层模块中使用，定义变量时会为这些内存变量赋以初值.F.。,董捎筷擂蔗秦拙鼎枉皮剧懈紊拆稽契溉苑痹锰宅肪犬夏堑潦箱锨侥消椭奎数据库软件Visual Foxpro课件第八章 程序设计基础数据库软件Visual Foxpro课件第八章 程序设计基础,
