vf程序设计基础

1、1第八讲 程序设计基础（一）目 录上一页下一页退 出2 本本 章章 要要 点点8.1 8.1 Visual FoxProVisual FoxPro的工作方式的工作方式8.2 8.2 程序文件的建立与编辑程序文件的建立与编辑8.3 8.3 程序的基本结构程序的基本结构8.4 8.4 分支结构分支结构目 录上一页下一页退 出38.1 Visual FoxPro的工作方式 Visual FoxPro系统提供有三种工作方式：即单命令方式、菜单方式及程序文件方式。 1.1.单命令方式单命令方式 Visual FoxPro单命令方式是利用Command 窗口来实现的。用户通过Command 窗口输入命令，

2、并执行操作。在Command 窗口中，可以输入单个的操作命令和系统命令，完成对数据库的操作管理和系统环境的设置；也可以建立命令文件及运行命令文件。 Command 窗口不仅是Visual FoxPro命令的执行窗口，也是Visual FoxPro命令文件的编辑窗口。 所谓单命令方式，即输入一条命令，完成一个操作的工作方式。 要 点目 录上一页下一页退 出42.2.菜单方式菜单方式 在Visual FoxPro 环境下，也可以通过系统提供的菜单选项，对数据库资源进行操作管理和对系统环境进行设置；并通过菜单建立命令文件及运行命令文件。所谓菜单方式，即通过打开不同的菜单选择并完成不同的操作。我们在以

3、前各章所讲的内容其实都可说是菜单方式。3.3.程序文件方式程序文件方式 程序文件（简称程序）也叫做命令文件。运用程序文件方式进行数据库管理，是通过程序文件编辑工具，将对数据库资源进行操作管理的命令和对系统环境进行设置的命令，集中在一个以（.PRG）为扩展名的命令文件中，然后再通过菜单方式或命令方式运行该命令文件。所谓命令方式，即通过程序文件中的命令完成不同的操作。要 点8.1 Visual FoxPro的工作方式 目 录上一页下一页退 出58.2.1 程序的概念有关此Visual FoxPro程序的几点说明 :1注释语句注释语句【格式1】 NOTE 【格式2】 * 【格式3】 & 【功能】增强

4、程序文件的易读性或放弃中语句的执行 2对话开关语句对话开关语句【格式】SET TALK OFF|ON【功能】关闭或打开命令执行时的对话开关3命令的分行命令的分行Visual FoxPro程序是命令行的序列，每个命令都以回车键结束，一行只能写一条命令；若一条命令太长，一行写不下，也可分行书写，并在分行处加上续行符“；”，再按回车键。8.2程序文件的建立与编辑目 录上一页下一页退 出68.1.2程序文件的建立、修改与执行 1 1建立或修改程序文件建立或修改程序文件 可用两种方式调用系统内置的文本编辑器建立或修改程序文件 : 命令方式命令方式 MODIFY COMMAND 程序文件名或 MODIFY

5、 FILE 程序文件名菜单方式菜单方式 打开“文件”菜单，选择“新建”；在“新建”窗口，选择“程序”，再选择“新建文件”要 点8.2程序文件的建立与编辑目 录上一页下一页退 出72保存程序保存程序 程序输入、编辑完毕，单击【文件】|【保存】菜单项，或按Ctrl+W复合键，在“另存为”对话框中指定程序文件的存放位置和文件名，并单击“保存”按钮保存程序文件并退出文本编辑器。程序文件的默认扩展名是.PRG。 8.2程序文件的建立与编辑目 录上一页下一页退 出83执行程序执行程序程序文件建立后，可以用多种方式、多次执行它。下面是两种常用的方式。（1 1）菜单方式）菜单方式 单击【程序】|【运行】菜单项

6、，打开“运行”对话框； 从文件列表框中选择要运行的程序文件，并单击“运行”命令按钮，启动运行该程序文件 （2 2）命令方式）命令方式【格式】DO 【功能】执行指定、下的程序文件 8.2程序文件的建立与编辑目 录上一页下一页退 出9执行程序文件时，将依次执行文件中的命令，直到所有命令执行完毕，或者执行到以下命令：1 CANCAL：终止程序运行，清除所有的私有变量，返回命令窗口；2 RETURN：结束程序执行，返回调用它的上级程序，若无上级程序则返回命令窗口；3 QUIT：结束程序执行并退出Visual FoxPro系统，返回操作系统 8.2程序文件的建立与编辑目 录上一页下一页退 出108.2.

7、3简单的输入输出命令1ACCEPT命令命令【格式】ACCEPT TO 【功能】在程序执行过程中，将用户交互式输入的内容作为字符串赋值给指定内存变量。 该命令只接受字符型数据，输入的字符串不需要加定界符 8.2程序文件的建立与编辑目 录上一页下一页退 出11 【例8-1】编程从键盘输入某数据库的文件名，要求打开该数据库并显示其内容。程序文件名为PROG2.PRG。MODI COMMAND PROG2SET TALK OFFCLEARACCEPT “请输入数据库名：” TO AAAOPEN DATABASE &AAAACCEPT 请输入表名 TO BBBUSE &BBBLISTUSESET TAL

8、K ONRETURN8.2程序文件的建立与编辑目 录上一页下一页退 出122 2INPUTINPUT命令命令 【格式】INPUT TO 【功能】在程序执行过程中，将用户交互式输入的内容赋值给指定内存变量 可以输入字符型、数值型、逻辑型、日期型和日期时间型等类型数据，而且可以是常量、变量、函数或表达式等形式，按回车键结束输入，系统将输入的数据赋值给。8.2程序文件的建立与编辑目 录上一页下一页退 出13【例8-2】从键盘输入两个任意正数，编程求以两数为边长的长方形面积。程序文件名为PROG4.PRGSET TALK OFFCLEARINPUT “长方形一边的长为：” TO AINPUT “长方形

9、另一边的长为：” TO BS=A*B? “长方形的面积为：” , SSET TALK ON RETURN8.2程序文件的建立与编辑目 录上一页下一页退 出143 3WAITWAIT命令命令【格式】WAIT TO WINDOW AT, NOWAIT CLEAR|NOCLEAR TIMEOUT【功能】显示提示信息，暂停程序执行，直到用户按任意键或单击鼠标时继续执行程序。 若选择可选项TO ，将输入的单个字符作为字符型数据赋给指定的；若用户是按Enter键或单击鼠标，的值为空串。 若省略所有可选项，屏幕显示“键入任意键继续”默认提示信息 8.2程序文件的建立与编辑目 录上一页下一页退 出154三条输

10、入命令的异同三条输入命令的异同ACCEPT命令只能接受字符型数据，不需定界符，输入完毕按回车键结束； WAIT命令只能输入单个字符，且不需定界符，输入完毕不需按回车键； INPUT命令可接受数值型、字符型、逻辑型、日期型和日期时间型数据，数据形式可以是常量、变量、函数和表达式，如果是字符串，需用定界符，输入完毕按回车键结束。 8.2程序文件的建立与编辑目 录上一页下一页退 出168.3程序的基本结构 Visual FoxPro系统提供的命令丰富，且功能强大，把这些命令和程序设计语句有效地组织在一起，就形成了实现某一特定功能的程序。 Visual FoxPro系统的程序有两个特点：一是程序控制流

11、模式，由顺序、分支、循环三种基本结构构成。二是面向对象可视化的结构程序模块，在每个模块的内部也是由程序控制流组成。常见的控制结构如下： 1 1顺序结构顺序结构 顺序结构是在程序执行时，根据程序中语句的书写顺序依次执行的命令序列。Visual FoxPro系统中的大多数命令都可以作为顺序结构中的语句。2 2分支结构分支结构 分支结构是在程序执行时，根据不同的条件，选择执行不同的程序语句，用来解决有选择、有转移的诸多问题。要 点目 录上一页下一页退 出173 3循环结构循环结构 循环结构则能够使某些语句或程序段重复执行若干次。如果某些语句或程序段需要在一个固定的位置上重复操作，使用循环是最好的选择

12、。4 4过程结构过程结构 在许多应用程序中，有一些程序段需要反复执行多次，这些程序段不在一个固定的位置上，而是分散在程序的许多位置上重复执行，可将其与嵌入它的程序分开，形成独立的程序序列，待使用时再调入程序中，以实现不同位置上的重复操作。这样做增强了程序的可读性和模块化。我们称这种具有独立功能而且可以被其它程序调用的程序序列为过程。要 点8.3程序的基本结构 目 录上一页下一页退 出18 8.3.1分支结构分支结构形式有如下三种：1 1单向分支单向分支 单向分支语句，即根据用户设置的条件表达式的值，决定某一操作是否执行。 （1）语句格式： IF条件表达式 命令行序列 ENDIF （2）语句功能

13、： 该语句首先计算条件表达式的值，当条件表达式的值为真时，执行命令行序列；否则，执行ENDIF后面的第一条命令。要 点 条 件 式真 语 句 序 列 假 ENDIF 之 后 语 句 8.3程序的基本结构 目 录上一页下一页退 出19【例8-3】求一元二次方程AX2BXC0的实根。程序文件名为PROG7.PRG。SET TALK OFFCLEARINPUT TO AINPUT TO BINPUT TO CZB2-4*A*CIF Z=0X1=(-B+SQRT(Z)/(2*A)X2=(-B-SQRT(Z)/(2*A)? X1,X2ENDIFSET TALK ONRETURN8.3程序的基本结构 目

14、录上一页下一页退 出202 2双向分支双向分支 双向分支语句，即根据用户设置的条件表达式的值，选择两个操作中的一个来执行。 （1）语句格式： IF条件表达式 命令行序列1 ELSE 命令行序列2 ENDIF （2）语句功能： 该语句首先计算条件表达式的值，当条件表达式的值为真时，执行命令行序列1中的命令；否则，执行命令行序列2中的命令；执行完命令行序列1或命令行序列2后都将执行ENDIF后面的第一条命令。要 点 真 条 件 式 假 语 句 序 列2 语 句 序 列1 ENDIF后 面 语 句 8.3程序的基本结构 目 录上一页下一页退 出21【例8-4】编写一密码校验程序（假设密码为ABC）。

15、程序文件名为PROG10.PRG。SET TALK OFFCLEARACCEPT “请输入您的密码：” TO AAAIF AAA=”ABC”CLEAR? ”欢迎使用本系统！”ELSE?”密码错误！”WAITQUITENDIFSET TALK ON8.3程序的基本结构 目 录上一页下一页退 出223 3多向分支多向分支 多向分支语句，即根据多个条件表达式的值，选择执行多个操作中的一个对应执行 。（1）语句格式： DO CASE CASE条件表达式1 命令行序列1 CASE条件表达式2 命令行序列2 CASE条件表达式N命令行序列N OTHERWISE 命令行序列N+1 ENDCASE要 点 真

16、条件式 2 语句序列 1 ENDCASE 后面语句 条件式 1 Otherwise 条件式 2 真 语句序列 2 真 语句序列 n-1 有 语句序列 n 无 8.3程序的基本结构 目 录上一页下一页退 出23【例8-5】假设收入（P）与税率（R）的关系如下表，编程求税金。程序文件名为PROG12.PRG。 0 P800R= 0.05 800 P2000 0.08 2000P5000 0.1 P5000 SET TALK OFFCLEARINPUT “请输入收入：” TO PDO CASECASE P800 R=0CASE P2000 R=0.058.3程序的基本结构 目 录上一页下一页退 出24CASE P5000 R=0.08OTHERWISE R=0.1ENDCASETAX=P*R? ”税金为：”,TAXSET TALK ON RETURN8.3程序的基本结构 目 录上一页下一页退 出25 （2）语句功能： 该语句根据给出的N个条件表达式的值，选择N+1个命令行序列中的一个执行。当所有CASE中条件表达式的值都是假时，如果有OTHERWISE项，则执行命令行序列N+1，再执行ENDCASE后面的第一条命令；否则，直接执行ENDCASE后面的第一条命令。要 点8.3程序的基本结构 目 录上一页下一页退 出264 4使