VFP第6章-11.ppt

第 六 章 程序设计基础;6.1 结构化程序设计概述 6.2 程序文件的建立、编辑与执行 6.3 程序设计辅助命令 6.4 程序的基本控制结构 6.5 子程序、过程文件与自定义函数 6.6 程序调试 ;6.1 结构化程序设计概述;6.1.2 程序设计和算法;6.2 程序文件的建立、编辑与执行;6.2.2 程序文件的调用执行 1．菜单方式 单击主菜单项“程序”，在弹出的下拉菜单中选择“运行”命令。 2．命令方式 格式：DO [路径]程序文件名 [With 实际参数表] 功能：将磁盘上“文件名”所指的命令文件调入内存并运行。 说明： ① 程序文件的执行中，如果发生错误，系统将给出错误信息，用户可返回编辑状态进行修改。 ② 本命令中的可选项 [With 参数表] 用于执行带参数的程序。参数的作用是向将要运行的程序传递数据。;【例6.3】 简单程序举例：编写程序求半径为3的圆面积。 程序文件取名为:circle.prg r=3 s＝3.14159*r*r ? ”圆面积：”，s Return 上述程序文件，可用下述命令执行： Do circle 执行结果： 圆面积： 28.27431 ;6.3 程序设计辅助命令 ;Input 命令说明： ① Input命令执行时，先在屏幕上显示提示信息，然后暂停程序的运行，等待从键盘输入数据。用户输入后，按下回车键，系统将所输入的数据送到指定的内存变量中。 ② Input命令能够接收任意类型的Visual FoxPro表达式，计算出结果后，再赋值给内存变量。如果输入的表达式中有字符串、日期型、逻辑型常量，则必须使用定界符。 ③ 如果内存变量未定义，将在执行此命令时建立内存变量。 ④ Input命令每次只能为一个变量输入值。 ⑤ ＜提示信息＞可以省略。 ;【例6.4】编写程序，由键盘输入半径，求圆面积。（在程序运行时输入半径，可以实现求任意半径的圆面积,提高程序的通用性）。 程序circle1.prg的内容如下： Input “半径=” To r s＝3.14159*r*r ? “圆面积=”，s Return;⑵ Accept命令 格式：Accept [提示信息] TO 内存变量名 功能：将从键盘上接收的字符串存入指定的内存变量中。 说明： ① 执行此命令时，先在屏幕上显示提示信息，然后暂停程序运行，等待用户从键盘输入数据，并以回车键结束。系统将输入的数据存入指定的内存变量中，然后，继续运行程序。 ② Accept命令只能接收字符型数据，因此所有输入的数据都被作为字符型，不需要加定界符。 ③ 如果内存变量未定义，将在执行此命令时建立内存变量，Accept命令所定义的内存变量为字符型。 ;【例6.5】编程完成如下功能:从键盘输入某个表文件名，要求打开并显示此表中的数据。 Accept “请输入表名” To x Use x List Use Return;⑶ Wait命令 格式: Wait [提示信息] [To 内存变量] [Window] [Nowait] [Timeout 数值表达式] 功能：执行该命令时，暂停程序的运行，在屏幕上显示＜提示信息＞，并等待用户从键盘输入任意字符，之后将其赋值给指定的内存变量，程序继续往下执行。;说明： ① 可选项＜提示信息＞含义同Accept命令的提示信息。 ② 可选项To＜内存变量＞，将用户输入的字符存入＜内存变量＞中,若按回车,内存变量的值为空。若无此可选项，键入的值不保存。 注意：＜内存变量＞中只能保存输入的第一个字符。 ③ 如无任何可选项，系统在执行此命令后，自动显示“Press any key to continue …”，表示按任意键继续执行程序。 ④ 加Window选项时，将在屏幕右上角的提示窗口内显示提示信息；选择Nowait选项则仅显示提示信息，而不暂停。Timeout表示最大等待时间，如果在＜数值表达式＞表示的时间内无键盘输入，则继续程序的执行，等待时间以秒计。;【例6.6】 依次显示zgqk、gz、kyqk三个表的内容,没有输入任何键时，最多等待10秒钟，即开始显示下一个表的内容。 Use zgqk List Wait “请按任意键显示下一个表的内容” timeout(10) Use Use gz List Wait “请按任意键显示下一个表的内容” timeout(10) Use Use kyqk List Wait “请按任意键结束” timeout(10) Use Return;2．数据输出命令 格式：?/?? [表达式表] 功能：计算并输出表达式的值 说明： ① 命