Visual FoxPro6.0中文版教程 教学课件 作者 姚翠友 徐世英 第7章.doc

第七章 结构化程序设计 7.1程序基本操作 程序：为完成某项任务所需执行的命令序列，这些命令按照一定的机构有机地组合在一起，并以文件形式存储在磁盘上，因此也称为命令文件。 例：USE 学生表 GO 5 DISPLAY USE 7.1.1 程序的建立 1、菜单方式 2、命令方式 格式：MODIFY COMMAND 程序名 说明：扩展名.PRG 7.1.2 程序的运行 1、菜单方式 2、命令方式 格式：DO 应用程序名 说明：1）文件名中扩展名的默认值为.PRG 2）按下ESC键可使正在运行的程序强行中断。 7.1.3 程序的修改 1．菜单方式：“文件”菜单—打开 2．命令方式：MODIFY COMMAND 程序名 说明：1）编辑完毕后，按下Ctrl+W或Ctrl+END存盘退出； 2）按下ESC键，放弃本次修改。 7.2 简单的输入输出命令 7.2.1 交互输入命令 1、键入字符串命令 格式：ACCEPT [提示信息] TO 内存变量 说明：1）键入的字符串可以不使用定界符 2）不键入任何字符串而只按回车键，内存变量的值将只是一个空字符串 3）提示信息，显示在屏幕上 示例：编写可以打开任一数据表文件的通用命令： ACCEPT “请输入要打开的表文件名：” TO BM USE BM LIST USE 2．输入单字符命令 格式：WAIT [提示信息] [TO 内存变量] [NOWAIT] [TIMEOUT] 说明：1）提示信息：可选项，默认为PRESS ANY KEY TO CONTINUE…… 2）TO 内存变量：可选项，按回车键，只将一个空字符存入内存变量 示例1：使用WAIT命令编写VFP程序。 SET TALK OFF CLEAR USE 学生表 LIST USE WAIT USE 分数 LIST USE SET TALK ON RETURN 示例2：试编写一个VFP程序，能够根据键入的系别代号（单字符）在不同系的档案表文件中查找某一职工的情况。 *L2.PRG SET TALK OFF CLEAR WAIT “请输入系的代号：” TO DH XH=“DH”+DH USE XH ACCEPT “请输入职工姓名：” TO XM LOCATE FOR 姓名=XM ?“职工姓名：”+姓名 ?“性别：”+性别 ?“年龄：”+STR(年龄,2) ……… WAIT ?“职称：”+职称 ?“任教课程：”+任教课程 ?“教研室：”+教研室 ……… WAIT SET TALK ON RETURN 3．键入表达式命令 格式：INPUT [提示信息] TO 内存变量 说明：1）提示信息：可选项 2）内存变量的数据类型取决于键入数据的类型，不得为M型。 3）键入的内容：表达式、字符型或逻辑型常量——定界符、无效表达式或只按回车键——显示错误信息 示例：试运行下述交互输入命令。 INPUT “请输入学生姓名：” TO XM INPUT “请输入其班级：” TO BJ 7.2.2 常用的输出命令 格式：@ 行，列 SAY 表达式 7.2.3 其他命令 1．注释命令 格式I：NOTE 注释内容 格式II：*注释内容 格式III：……注释内容 说明：1）非执行语句 2）注释内容最后一个字符是分号(;)，系统默认下一行内容仍为注释内容。 2．清除命令 格式I：CLEAR 格式II：CLEAR ALL：关闭所有文件，清除所有内存变量 格式III：CLEAR TYPEAHEAD：清除键盘缓冲区 3．运行中断和结束命令 格式I：QUIT 格式II：CANCEL 格式III：RETURN [TO MASTER] 7.3 程序的基本结构 三种程序结构：顺序结构、分支结构和循环结构 7.3.1 顺序结构 1．顺序结构程序：直接程序或简单程序，自始至终按照程序中命令语句的先后顺序逐条执行。 2．举例 例1：在“学生表”中查看“李尚清”的基本情况。 SET TALK OFF CLEAR USE 学生表 LOCATE FOR 姓名=”李尚清” DISP USE SET TALK ON 例2：编写一程序，根据用户输入的半径值，计算出相应的圆的周长。 SET TALK OFF CLEAR INPUT “请输入圆的半径：” TO R L=2*3.1416*R @10,10 SAY “圆的周长是：”+STR(L,6,3) SET TALK ON RETURN 7.3.2 分支结构 分支结构程序：按照一定条件由判断语句或选