《进一步研究项目设计方案》由会员分享，可在线阅读，更多相关《进一步研究项目设计方案（83页珍藏版）》请在金锄头文库上搜索。
1、 进一步研究项目设计方案 设计程序 制作界面 主要内容 各公司对项目设计方案再一次仔细研究，学生相互探讨，相互学习，设计出系统所需界面的版面 进一步研究项目设计方案返 回 在前面各讲中，我们主要用菜单和命令方式操作 数据库，但是要开发有实用价值的系统，必须采 用程序设计方法。Visual FoxPro的程序设计包括 结构化程序设计和面向对象程序设计。前者是传 统的程序设计方法，主要用于过程和函数的编写 ，后者借助系统提供的辅助工具实现界面设计。 在面向对象程序设计中，需要为对象编写事件代 码，也要用到结构化程序设计的方法。就此而言 ，结构化程序设计是面向对象程序设计的基础。设计程序什么是程序?
2、 程序是能够完成一定任务的命令的有序集合。这组命令 被存放在称为程序文件或命令文件的文本文件中。当运 行程序时，系统会按照一定的次序自动执行包含在程序 文件的命令。 程序方式的特点是什么? 可以利用编辑器，方便地输入、修改和保护程序；可以 用多种方式、多次运行程序；可以在一个程序中调用另 一个程序。 程序与交互操作的区别是什么? 交互操作一次只能执行一条命令，而程序一次能运行多 条命令；程序文件一旦编成，即可长期保存并且可多次 运行，而再次执行交互操作需重新输入命令；程序方式 可以完成一些复杂的任务，而交互操作的功能是有限的 。程序中常用的几条命令1、清除屏幕命令命令格式：CLEAR 功能：清
3、除屏幕上显示的信息 2、注释命令 命令格式： NOTE * & 功能：程序的说明性语句，不执行 3、允许或不允许系统自动显示提示信息命令命令格式： Set talk on|off 4、返回语句命令格式： return功能：返回系统调用本程序的位置 程序中常用的几条命令5、INPUT命令 命令格式： INPUT TO 功能：该命令等待用户从键盘输入数据，用户可以输入 任意合法的表达式。当用户以回车键结束输入时，系统将表达式的值存入指定的内存变量，程序继续运行。例1、 编写一个能计算任意半径的圆的周长和 面积的程序，程序文件名为LS2.prg。 INPUT“请输入圆的半径:“ TO R L=2*3
4、.14*R S=3.14*R2 ?“半径为:“+ALLTRIM(STR(R)+“的圆的周长和面 积如下:“程序中常用的几条命令6、ACCEPT命令 命令格式： ACCEPT TO 功 能：该命令等待用户从键盘输入字符串。当用户以回车 键结束输入时，系统将该字符串存人指定的内容变量， 程序继续运行。例2、 输入姓名，在XSQK.DBF表中查询该 姓名对应 的学号，程序文件名为cxxh.prg。USE xsqk .dbf accept “请输入姓名:“ to xm locate for 姓名= xm ?姓名,学号 Use程序中常用的几条命令7、WAIT命令 命令格式： WAIT TO 功 能：该命
5、令显示字符表达式之值作为提示信息，暂停程序 的执行，直到用户按任意键或单击鼠标时继续程序的执行 。 例3、分屏显示男、女学生的情况，程序文件名为 waitcx.prg。use xsqk.dbf list for 性别=“男“ wait “按任意键显示女学生的情 况“window timeout 15 list for 性别=“女“ use程序文件的建立与执行以命令方式建立、编辑程序文件 命令格式： MODIFY COMMAND | ? MODIFY FILE | ?ctrl+w存盘 ctrl+q放弃存盘 放弃存盘例1： 编写一个计算半径为10米的圆的周长和面积 的程序，程序文件名为LS1.pr
6、g。R=10L=2*3.14*RS=3.14*R2?L,S运行程序文件方法1：菜单单方式：程序运行,打开“运行”对话框 从文件列表框中选择要运行的程序文件，并单击“运行” 命令按钮 方法2：命令方式命令格式：DO WITH 注意：DO命令默认运行.PRG程序， DO命令中的只 需输入主文件名。要运行其它程序，中须包括扩展 名 程序的基本结构-顺序结构执行过程： 按照语句排列的先后顺序依次执行，即从第一条执 行到最后一条。 例5、两数之和、之差、积 Clear Input “请输入第一个数“to a input “请输入第二个数“ to b S=0 S=a+b ?”两个数之和为”，s分支结构是在
7、程序执行时，根据不同的条件，选择执行不 同的程序语句，用来解决有选择、有转移的诸多问题。分支结构1IF条件语语句IF ELSE ENDIF 原理：首先判断的 逻辑值，若条件为“真”时，执 行。然后，再执行 Endif后面的。若条 件为“假”时，执行Else后面的 。然后，再执行 Endif后面的。分支语句的嵌套对于二分支以上的问题，需要使用分支语句的嵌套或多 重分支选择结构。要求各个层次的IF语句之间不能交叉 ，每一层的If、Else以及EndIf必须一一对应。 多分支语语句多分支语句实现一种扩展的选择结 构，它可以根据条 件 从多组命令中选择一组执行。DO CASE CASE CASE CA
8、SE ORTHERWISE ENDCASE例8、编写一个简单的菜单程序，提供“添加”、“修改” 和“打印”三种功能选择并转入相应处理，程序文件名为 MCASE.prg。CASE OP=2 BROW CASE OP=3 WAIT “请准备好打 印机,按任意键开始 “ LIST TO PRINT OTHERWISE ?“选择错 !“ ENDCASE USEuse XSQK CLEAR Text 1.添加 2.修改 3.打印 Endtext input “请选择:“ to op DO CASE CASE OP=1 APPEND循环结构循环结构也称为重复结构，是指程序在执行的过 程中，其中的某段代码被
9、重复执行若干次。 被重 复执行的代码段，通常称之为循环体。 循环结构1、条件循环DO WHILE LOOPEXITENDDO说明1：在循环体中如遇到Loop短路语句，就不执行 Loop与Enddo之间的所有语句，直接返回Do While循 环起始语句，继续进行循环判断 ，如图所示： 说明2：在循环体中如遇到Exit命令，就强行退出循 环，即不执行Exit与EndDo之间的所有语句，直接转 向执行EndDo语句后面的命令，结束循环。如图 所 示 ： 例9：计算s=1+2+3+10000的和,名为sumdo.prg 。set talk off Clear sum=0 i=1 Do while i
10、= TO STEP ENDFOR | NEXT说明: 1、的值可正可负，默认值为1。 2、 和都可以是数值表达式。但这 些表达式仅在循环语句执行开始时被计算一次。在循环语 句的执行过程中，初值、 终值 和步长是不会改变的。 可以在循环体内改变循环变量的值，但这会影响循环体的 执行次数。例11、 用步长循环编写计算s=1+2+10000的程序Clears=0i=1for i=1 to 10000s=s+iendfor?“s=:“,s&编写s=1+3+5+99993表文件扫描循环 SCAN FOR WHILEENDSCAN执行过程说明：1、Scan循环是内含Eof（）和Skip的一种循环处理。Sc
11、an 为循环入口，EndScan为循环出口，必须配套使用。两者之 间的内容即为循环体。 2、Scan 循环是针对某个数据表的操作，可以在语句中说 明数据表的作用范围和For条件表达式，其意义是仅对 指定范围满足For条件表达式的记录执行循环体语句操 作。 3、执行循环体内容后，若遇到Loop语句，记录指针移到 下一条记录，返回Scan循环入口。若遇到Exit语句，强行 结束扫描循环，执行EndScan后面的语句。4、当For条件表达式为多个条件或进行多分支处理时 ，应在Scan循环内嵌套Do Case或If分支选择语句。例13、 在学生档案表中，显示高考成绩大于520分的学生学 号、姓名、籍贯
12、和高考成绩并统计其个数。Close all Clear Use F:学生档案表 Store 0 To S Scan For 高考成绩520 ?“学号：“+学号+Space(2)+“姓名：“+姓名+Space(2)+“籍 贯：“+籍贯+Space(2)+“高考成绩：“+Str(高考成绩,5,1) S=S+1 EndScan ? “高考成绩大于520分学生人数有：“+Str(S,3)+“人“ Return多重循环一个循环的循环体中又有另外一个循环时，称为多重循环，VFP程序可以使用多重循环。返 回表单单的基本操作表单（Form）是Visua FoxPro提供的用于建 立应用程序界面的最主要的工具之
13、一 创建表单方式：1使用表单向导创建表单 ：文件 新建命令，“ 工具” 菜单的“ 向导” 子菜单 中选择“ 表单” 在项目管理器调用表单向导 2. 使用表单设计器可以使用下面三种方法中的任何一种调用表单设计器：a、在项目管理器环境下调用b、 菜单方式调用c、命令 方式调用 3.在命令窗口输入命令:CREATE FORM 表单名 4.在表单设计器环境下，可以调用表单生成器方便、快速 地产生表单利用表单设计器创建表单分为四步骤：1打开表单设计器 方法1：在命令窗口中输入Create Form命令或在命 令窗口中输入MODIFY FORM 表单名，进入表单设计器， 建立或修改已存在的表单。 方法2：
14、 执行文件新建，从“新建”对话框中选定“表单”、单 击“新建表单”，进入表单设计器 方法3：执行文件打开，在 “打开”对话框中，选择要 打开的项目文件，在“项目 管理器”窗口中，“新建表 单”对话框中，单击“新建 文件”按钮，进入表单设计 器。2设设置数据表表单单的数据环环境“数据环境设计器”打开后，会弹出 “添加表或视图 ”的窗口。要求用户将表单中要用到的表、视图添加到 数据环境设计器中。如果已经在数据库中设计了联系 ，则相应的联系也会自动添加到数据环境设计器并且 在运行表单时会自动打开、自动发挥 作用。按钮锁定与生成器按钮锁定与生成器3设设 计计 表 单单4、保存表单单文件单击“文件”、“
15、保存”，在“另存为”窗口中，选择盘 符、目录、文件名、文件类型（表单文件的类型是.Scx） ，单击“保存”按钮。特别注意：表单文件在保存时， 将同时建立.Scx主表单文件和.Sct表单备注文件。属性名属性的意义AlwaysOnTop控制表单是否总是处于其他的窗口之上。 AutoCenter控制表单在初始化时是否自动居中。BackColor定义表单的背景色。BorderStyle决定表单是否有边框，还是单边 框，固定对话 框或可调边 框。 Caption定义表单标题栏显 示的文本。 Closable控制表单是否具有关闭按钮。 Left定义表单与屏幕左边的距离。 Top定义表单与屏幕顶部的距离。
16、Height定义表单的高度。表 单属性名属性的意义MaxButton控制表单是否有最大化按钮。 Minbutton控制表单是否有最小化按钮。 Movable控制表单是否能够移动到屏幕的新位置。 MDIForm.T.则子表单最大化时能够与其父表单结合在一起，.F.则子表 单最大化时仍然保留自身的标题行和标题文本。 Name定义表单的名称。 Picture定义表单的背景图片。 ShowWindo w定义表单的类型，0表示在屏幕中（默认），1表示在顶层表 单中，2表示建立顶层表单。 WindowStat e控制表单在运行时，是最小化(1)，最大化(2)还是正常状态(0) 。 WindowTyp e控制表单是非模式（0）还是模式（1）。如果是模式表单必 须关闭才可用其他部分事件事件的意义Load当表单装入内存前发生，系统还不能识别 表 单中的对象。 Init当表单从内存加载之后发生，系统能识别
