命令文件.pptVIP

Visual FoxPro 数据库与程序设计 教师：王长全 副教授 信箱：abc7010@126.com 山东大学威海分校商学院 第6章 程序文件 本章主要内容： 程序文件的建立和运行 顺序结构 选择结构 循环结构 什么是程序（Program）？ 程序是能完成一定任务的命令的有序集合。 与在命令窗口逐条输入命令相比，采用程序方式有以下好处： 可利用编辑器，方便地输入、修改和保存程序； 可重复运行程序； 能在一个程序中调用另一个程序。 程序文件（*.prg）即命令文件。 建立程序文件 1、菜单操作： 2、使用“项目管理器”： 3、使用命令： MODIFY COMMAND|FILE 程序文件名 保存程序文件 1、单击“文件/保存”； 2、单击工具栏保存按钮； 3、Ctrl+W 、Ctrl+s； 4、关闭程序编辑窗口，按提示保存。 运行程序文件 1、单击工具栏“！”或“Ctrl+E”； 2、在命令窗口中输入 “DO 程序文件名”； 3、菜单中“程序/运行”。 6.2 程序结构 结构化程序设计思想：将复杂问题的求解过程分阶段进行，自顶向下、逐步细分，模块化设计、结构化编码。 程序的组成 输入、运算处理、输出 程序的四种基本结构 顺序、选择、循环和子程序模块 6.3 顺序结构 顺序结构：语句输入的顺序也是该程序语句执行的顺序。 顺序结构程序中的常用命令 键盘输入命令 ACCEPT 接受用户从键盘输入的字符型数据，并保存； INPUT 接受用户从键盘输入的各种类型数据，并存入指定的内存变量； WAIT 显示信息并暂停VisualFoxPro的执行，接受用户从键盘输入的一个字符型数据或单击鼠标后继续执行。 6.4 选择结构 单分支 IF…ENDIF 双分支 IF…ELSE…ENDIF 多分支 DOCASE… ENDCASE 单分支 语法： IF 条件表达式 命令序列1 ENDIF 【例6.8】如果学生表第二条记录的入学成绩大于550分，就显示其姓名和入学成绩。 CLEAR OPEN DATA 教学管理 USE 学生 GO 2 If 入学成绩550 ? 姓名 ? 入学成绩 endif return 【例6.7】建立程序文件，假设管理员帐号为“admin”,密码为“123”，当输入正确时显示欢迎信息。 CLEAR Accept 请输入帐号: to user Accept 请输入密码: to passed If user==admin and passed==123 ? 欢迎使用本系统! Endif return 双分支 语法： IF 条件表达式 命令序列1 ELSE 命令序列2 ENDIF 【例6.6】建立程序文件，当输入正确时显示欢迎信息,输入错误时显示出错信息。 CLEAR Accept 请输入帐号: to user Accept 请输入密码: to passed If user==admin and passed==123 ? 欢迎使用本系统! else ? 帐号或密码错误! Endif return 【例6.8】使用学生表，当从键盘输入Y时，输出年龄大于18岁的新生名单，当从键盘输入其他键时，输出成绩在500分以上的团员名单。 CLEAR OPEN DATA 教学管理 USE 学生 Accept 请输入: to c If upper(c)=Y list for year(date())-year(出生日期)18 else list for 入学成绩=500 AND 是否团员 endif Clos data 【例6.9】If语句的嵌套 INPUT 请输入行李重量: to 行李重量 INPUT 请输入火车票价: to 火车票价 If 行李重量=20 行李费=0 else if 行李重量20 and 行李重量=40 行李费=行李重量*火车票价*0.02 else 行李费=行李重量*火车票价*0.05 endif Endif ? 行李费 return 【例6.10】CASE语句的用法 INPUT 请输入行李重量: to 行李重量 INPUT 请输入火车票价: to 火车票价 Do case Case 行李重量=20 行李费=0 case 行李重量20 and 行李重量=40 行李费=行李重量*火车票价*0.02 Case 行李重量40 行李费=行李重量*火车票价*0.05 Endcase ? 行李费 return 【例6.12】计算分段函数值 CLEAR INPUT 请输入X的值： TO X DO CASE CASE X0