4讲至8讲第7章程序设计.pptx

7.1 程序文件的建立、修改与运行7.2 简单的交互式输入输出命令7.3 结构化程序设计7.4 过程与过程调用第七章 Visual FoxPro 7.0 程序设计Visual FoxPro的工作方式所谓单命令方式，即输入一条命令，完成一个操作的工作方式。所谓菜单方式，即通过打开不同的菜单选择并完成不同的操作。所谓程序方式，即批命令方式，是把一系列有序的命令放到一个文件中，再执行该文件整体。7.1.1 建立程序文件 建立程序文件有两种方法：一是命令方式，二是菜单方式。1、命令方式命令格式：Modify Command [程序文件名] Modify file [程序文件名.prg]2、菜单方式 选择菜单【文件】| “新建”菜单项，打开【新建】对话框。|选中“程序”单选按钮。7.1.2 修改程序文件 1、【文件】|【打开】，找到要修改的程序文件。2、命令方式：modify command [文件名] 程序文件编辑完后，选择【文件】|【保存】选项按“CTRL+W”键，ctrl+S来保存程序，按ESC键放弃程序的编辑并返回命令窗口。7.1.3 运行程序文件 1、命令方式：DO 程序文件名2、在菜单方式下运行【程序】|【运行】3、打开要运行的程序文件，并单击常用工具栏上的“运行”命令按钮(即)，来运行该程序文件 。 4、 快捷方式 Ctrl+E表示运行打开的当前程序。7.2 简单的交互式输入输出命令 7.2.1 交互式输入命令 1、非格式化的输入命令FoxPro提供了如下三个非格式化输入命令：（1）数据输入命令 (重点) 命令格式：Input [提示信息] To 〈内存变量名〉 功能：显示提示信息，暂停正在运行的程序，等待用户从键盘输入数据或表达式并按回车键后，将数据或表达式的值存入指定的内存变量中，再执行中断了的程序。 例1：从键盘随机输入一个正数，以该正数为半径，求圆的周长和面积。*L1.prg set talk offclearinput 半径= to rl=2*PI（）*rs=PI（）*r*r?圆周长=,l?圆面积=,sset talk on return 该程序可以无数次运行，从而求出无数个半径值不同的圆的周长和面积。 思考：从键盘输入两个任意正数，编程求以两数为边长的长方形面积。SET TALK OFFCLEARINPUT “长方形一边的长为：” TO AINPUT “长方形另一边的长为：” TO BS=A*B? “长方形的面积为：” , SSET TALK ONRETURN7.2.1 交互式输入命令 （2）字符串输入命令命令格式：Accept [提示信息] To 〈内存变量名〉功能：将用户输入的字符串赋值给指定的内存变量。说明：①输入的任何数据均被当作字符型赋值给内存变量。②如输入字符串为非空格打头，则不需要输入定界符③输入字符串长度不超过254个字符④命令提示信息与INPUT 相同。7.2.1 交互式输入命令 例2：重写例1题程序。*L2.prg set talk offclearaccept 半径= to rl=2*PI（）*val(r)s=PI（）*val(r)*val(r)?圆周长=,l?圆面积=,sset talk on return程序运行结果同例题2。7.2.1 交互式输入命令 （3）输入单字符命令命令格式：Wait[〈提示信息〉][To 〈内存变量名〉]功能：暂停程序执行，等待键入一个字符，继续执行。说明：①只能接受一个字符，输入完以后立即响应，不要按回车键。②如有TO 语句，则输入字符保存到指定变量，否则不保存。③若该语句不带子句，则暂停程序运行，屏幕显示 Press any key to continue …… 7.2.1 交互式输入命令 例3：重写例1题程序。*L3.prg set talk offclearinput 半径= to rl=2*PI（）*val(r)s=PI（）*val(r)*val(r)?圆周长=,lwait?圆面积= ,sset talk on return 三条输入命令的异同： ACCEPT命令只能接受字符型数据，不需定界符，输入完毕按回车键结束。 WAIT命令只能输入单个字符，且不需定界符，输入完毕不需按回车键。 INPUT命令可接受数值型、字符型、逻辑型、日期型和日期时间型数据，数据形式可以是常量、变量、函数和表达式，如果是字符串，需用定界符，输入完毕按回车键结束。2、格式化输入命令 FoxPro系统把屏幕横向分成70格，用0—79表示，每格能输出一个英文字符(一个汉字占2格)；纵向分成25行，用0—24表示，每行能输出一行字符。命令格式：@ 行坐标, 列坐标 Say 表达式 Get 变量 Read功能：在指定位