第五部分 程序设计基础.docVIP

第五部分 程序设计基础 1、命令文件 1）命令文件的建立、修改与运行 2）简单的交互式输入输出命令 3）程序的调试 2、三种基本的程序控制结构 1）顺序结构 2）分支结构 3）循环结构 3、子程序设计 1）过程、自定义函数的定义及调用 2）过程文件的使用 3）变量的作用域 4）过程或函数调用中的参数传递 4、综合程序设计 1）掌握使用Visual FoxPro进行程序设计的基本方法 2）根据给定的功能及程序，能补充完整程序或发现程序中的错误并加以纠正 3）按照任务的要求，能使用Visual FoxPro进行程序设计 第五部分 程序设计基础 一.命令文件 1．VFP的工作方式： 命令方式、菜单方式（前两种方式合称为：交互式方式） 和程序文件方式； 2．创建程序文件 扩展名：.prg ： （1）菜单方式 （2）命令方式： Modify command 程序文件名 3.程序文件的执行 do 程序文件名 Ctrl + E 4.常用的交互输入语句 （1）Accept语句 —— 字符接收语句 Input [ ] To 暂停程序的执行，等待用户从键盘上输入数据，赋给 中对应的变量。 （2）Input语句 —— 通用数据接收语句：数值型、字符型、逻辑型、日期型 Accept [ ] To 暂停程序的执行，等待用户从键盘上输入字符串，赋给 中对应的变量。 说明: Input语句与Accept语句区别： Input语句可接受任意类型的VFP表达式，而Accept语句只能接收字符串； ②当输入的是字符串，Input语句必须用字符串定界符括起来，而Accept语句不必必使用。 （3）Wait 语句—— 只能输入单个字符 Wait [ ] [To ] [Window [At , ]] [Timeout ] 语句功能： 暂停程序的执行，等待用户从键盘上输入一个字符串，赋给 中对应的变量，或在屏幕的右上角按给定时间（ 表示的是秒数）显示提示信息，或在屏幕的指定的 、 处按给定时间显示提示信息。 Input 和Accept 语句表示结束用Enter键，而wait语句是用任意键来表示结束 例如：clear Use rcda.dbf exclusive Input “请输入出生日期:” to csrq Delete for 出生日期 csrq clear Use zytc.dbf exclusive accept “请输入职称:” to zc Browse all for 职称 zc （4）格式输入语句（@ 、Read语句） 语句格式： @ 行，列 [Say ] Get Read 允许在指定的 行，列 位置输入一个常量， 当执行Read时将常量赋给指定的 。 5 . 输出语句： @ 行，列 Say [Picture ] 语句功能： 在指定的 行，列 ，按指定的格式输出 。 ？或？？ 例如: clear xm use rcda.dbf exclusive @ 10,10 say 请输入姓名： get xm read locate all for 姓名 xm @ 13,10 say 编号 picture XXXXXXXX @ 13,18 say 编号 picture 999.99 二、三种基本的程序控制结构 （1）三种基本结构：顺序结构、分支结构、循环结构 前面所讲的都是属于顺序结构 例：执行下列命令后，显示的结果是（　）　　X 50　　Y 100　　Z X+Y　　？50+Z　　A）50+Z　　B）50+X+Y　　C）200　　D）数据类型不匹配 [.] 功能：替换出字符变量的内容，即去掉定界符。__________。 SET EXACT OFF X ”A　” ? IIF “A” X,X-“BCD”,X+“BCD” A）A B）BCD C）A BCD D ABCD 单向分支： If …… EndIf 双向分支： If …… Else …… Endif 多向分支： Do case …… EndCase 使用分支语句的注意事项 （1）If…EndIf和Do Case…EndCase必须配对使用，Do Case与第一个Case 之间不应有任何命令。 （2） 可以是各种表达式或函数的组合，其值必须是逻辑值。 （3） 可以由一个或多个命令组成，可以是条件控制语句组成的嵌套结构。 （4）Do Case…EndCase命令，每次最多只能执行一个 。在多个Case的 值为真时，只执行第一个 值为真的 ，然后执行 EndCase的后面的第一条命令。 举例：编写程序“disp_jl”，根据从键盘输入的姓名，在rcda表中查找指定的姓名的记录，如果找到则把该条记录作逻辑删除，否则显示