第九章 系统主程序.pptVIP

第九章 系统主程序 本章结构 第一节 主程序的介绍 一、主程序的功能 二、主程序的类型 三、如何设置主程序 第二节 运行环境设置 一、设置数据环境 二、设置显示环境 三、设置操作环境 第三节 事件处理 第四节 防止程序多次开启 一、捕捉错误方式 二、API函数方式 第一节 主程序的介绍 一、主程序的功能 1 设置程序的运行环境， 2 定义全局变量或者常量， 3 调用其它程序如登录界面， 4 开始事件处理。 二、主程序的类型 VFP中，主程序的类型： 1 .Prg程序 2 表单 3 菜单 三、如何设置主程序 在VFP中，项目管理器会将第一个被创建的表单、.Prg程序或者菜单设置为主程序。 设置主程序，只需要在项目管理器中要设置为主程序的.Prg程序、表单或菜单上单击右键，在弹出的快捷菜单中选择“设置主文件”。 以粗体显示 程序的基本结构（补充） Visual FoxPro系统提供的命令丰富，且功能强大，把这些命令和程序设计语句有效地组织在一起，就形成了实现某一特定功能的程序。 Visual FoxPro系统的程序有两个特点： 一是程序控制流模式，由顺序、分支、循环三种基本结构构成。 二是面向对象可视化的结构程序模块，在每个模块的内部也是由程序控制流组成。 常见的控制结构如下： 1．顺序结构 顺序结构是在程序执行时，根据程序中语句的书写顺序依次执行的命令序列。Visual FoxPro系统中的大多数命令都可以作为顺序结构中的语句。 [例]建立程序P1．PRG，功能是显示“学生情况”表第1条记录的有关内容。 *程序名称：P1．PRG *功能说明：顺序结构程序举例 SET TALK OFF USE xsqk ＆＆打开表，此时当前记录号为 1  ？“第一条记录的有关情况：” ？no,name,sex USE SET TALK ON 2．分支结构 分支结构是在程序执行时，根据不同的条件，选择执行不同的程序语句，用来解决有选择、有转移的诸多问题。 多向分支 多向分支语句，即根据多个条件表达式的值，选择执行多个操作中的一个对应执行 。 （1）语句格式： DO CASE CASE 条件表达式1 命令行序列1 ［CASE 条件表达式2 命令行序列2 … … CASE 条件表达式N 命令行序列N］ ［OTHERWISE 命令行序列N+1］ ENDCASE 多向分支 ［例］建立程序P4．PRG ,输出xscj表中的第一条记录的成绩划分。在60—70之间为及格，70—90为良好，90—100为优秀，其它情况不及格。 USE xscj.dbf DO CASE case xscj.score=60 AND xscj.score70 ?成绩及格 case xscj.score=70 and xscj.score90 ?成绩良好 case xscj.score=90 ?成绩优秀 otherwise ?成绩不及格 endcase 3．循环结构 循环结构则能够使某些语句或程序段重复执行若干次。如果某些语句或程序段需要在一个固定的位置上重复操作，使用循环是最好的选择。 [例]建立程序P8．PRG，某厂1980年的产值为100万元，计划年增长率为5%，计算并显示1985、1990、1995、2000年的年产值。 clear set talk off v=100 r=0.05 ?1980年产值： 100.00万 for i=1981 to 2000 v=v*(1+r) if i/5=int(i/5) ?str(i,4)+年产值：,v,万 endif endfor return ［例]建立程序P9．PRG，其程序功能是使用多重循环打印一个九九乘法口诀表。 set talk off clear for y=1 to 9 for x=1 to y z=x*y ??+Str(y,1)+*+Str(x,1)+=+Str(z,2)+ endfor ? endfor set t