第七章  程序设计基础

　　大纲要求

　　1、 命令文件的建立与运行：

　　（1） 程序文件的建立。

　　（2） 简单的交互式输入输出命令。

　　（3） 应用程序的调试与执行。

　　2、 结构化程序设计：

　　（1） 顺序结构程序设计。

　　（2） 选择结构程序设计。

　　（3） 循环结构程序设计。

　　3、 过程与过程调用。

　　（1） 子程序设计与调用。

　　（2） 过程与过程文件。

　　（3） 局部变量和全局变量、过程调用中的参数传递。

　　4、用户定义对话框(MESSAGEBOX)的使用。

　　知识要点

　　1.Visual FoxPro的工作方式

　　Visual FoxPro系统提供有三种工作方式：即命令操作方式、菜单操作方式及程序文件操作方式。

　　2. 程序的概念

　　有关此Visual FoxPro程序的几点说明 :

　　(1)．注释语句

　　【格式1】NOTE <注释内容>

　　【格式2】*<注释内容>

　　【格式3】&&<注释内容>

　　【功能】为程序行加注释说明，以增强程序文件的易读性。

　　(2)．对话开关语句

　　【格式】SET TALK OFF|ON

　　【功能】关闭或打开命令执行时的对话开关

　　(3)．命令的分行

　　Visual FoxPro 程序是命令行的序列，每个命令都以回车键结束，一行只能写一条命令；若一条命令太长，一行写不下，也可分行书写，并在分行处加上续行符“；”，再按回车键。

　　2．建立或修改程序文件

　　可用两种方式调用系统内置的文本编辑器建立或修改程序文件 :

　　命令方式

　　MODIFY COMMAND [<盘符>] [<路径>]〈程序文件名〉

　　或

　　MODIFY FILE [<盘符>] [<路径>]〈程序文件名〉

　　菜单方式

　　打开“文件”菜单，选择“新建”；在“新建”窗口，选择“程序”，

　　再选择“新建文件”

　　3．保存程序

　　程序输入、编辑完毕，单击【文件】|【保存】菜单项，或按Ctrl+W复合键，在“另存为”对话框中指定程序文件的存放位置和文件名，并单击“保存”按钮保存程序文件并退出文本编辑器。程序文件的默认扩展名是.PRG。

　　4．执行程序

　　程序文件建立后，可以用多种方式、多次执行它。下面是两种常用的方式。

　　（1）菜单方式

　　① 单击【程序】|【运行】菜单项，打开“运行”对话框，选择程序文件，单击“运行”按钮；

　　② 从文件列表框中选择要运行的程序文件，打开该程序文

　　件，并单击“运行”命令按钮。

　　（2）命令方式

　　【格式】DO [<盘符>][<路径>/]<文件名>

　　【功能】执行指定<盘符>、<路径>下的程序文件

　　注意：

　　执行程序文件时，将依次执行文件中的命令，直到所有命令执行完毕。以下是终止程序运行的几个常用命令：

　　1. CANCAL:终止程序运行，清除所有私有变量，返回命令窗口。

　　2. DO：转去执行另一个程序。

　　3. RETURN：结束当前程序的执行，返回到调用它的上级程序，若无上级程序则返回到命令窗口。

　　4. QUIT：退出VF 系统，返回到操作系统。

　　例题：

　　1．在Visual FoxPro 中，程序文件的扩展名为____。

　　A．.prg

　　B．. qpr

　　C．.scx

　　D．.sct

　　[解析] 本题考查的知识点是程序文件的扩展名。在V1sual FoxPro中，程序文件的扩展名为．prg。

　　答案A 是程序文件的扩展名。选项B 是生成的查询程序文件的扩展名。选项C 是表单文件的扩展名。选项D 是表单备注文件的扩展名。

　　[答案] A

　　2．在Visual FoxPro 中，用来建立程序文件的命令是____。

　　A．OPEN COMMAND＜文件名＞

　　B．CREATE COMMAND＜文件名＞

　　C．MODIFY COMMAND＜文件名＞

　　D．以上答案都不对

　　[解析] 本题考查的知识点是建立程序文件的命令的使用。在VisualFoxPro 中，建立程序文件的命令是MODIFY COMMAND＜文件名＞。

　　选项A 和B 语法错误。选项C 是建立程序文件的命令。选项 D的说法错误

　　[答案] C

　　6．输入命令 INPUT

　　【格式】INPUT [<提示信息>] TO <内存变量>

　　【功能】在程序执行过程中，将用户交互式输入的内容赋值给指定内存变量 ,可以输入字符型、数值型、逻辑型、日期型和日期时间型等类型数据，而且可以是常量、变量、函数或表达式等形式，按回车键结束输入，系统将输入的数据赋值给<内存变量>。

　　注意：

　　（1）如果选用<字符表达式>，那么系统会首先显示该表达式的值，作为提示信息。

　　（2）输入的数据可以是常量、变量、表达式。但不能不输入任何内容直接按回车。

　　（3）输入字符串时必须加定界符，逻辑常量必须用圆点定界，日期常量用大括号（如{^2004-12-23}）

　　[举例]

　　1.输入”张航”到XM 变量中。

　　INPUT ”请输入员工姓名：” TO XM

　　请输入员工姓名：”李小林”

　　? XM

　　李小林

　　2.输入逻辑值到HF 变量中表示婚姻状况。

　　INPUT ”已婚否：” TO HF

　　已婚否：.T.

　　? HF

　　.T.

　　7．输入命令 ACCEPT

　　【格式】ACCEPT [<提示信息>] TO <内存变量>

　　【功能】在程序执行过程中，将用户交互式输入的内容作为字符串赋值给指定内存变量。该命令只接受字符型数据，输入的字符串不需要加定界符

　　注意：

　　（1）如果选用<字符表达式>，那么系统会首先显示该表达式的值，作为提示信息。

　　（2）该命令只能接收字符串。在输入字符串时不需要加定界符。

　　（3）如果不输入任何内容直接按回车。系统会把空串赋给指定的内存变量。

　　【例1】输入“平衡”到XM 变量中。

　　ACCEPT ”请输入教师姓名：” TO XM

　　请输入教师姓名：平衡

　　? XM

　　平衡

　　【例2】编程从键盘输入某数据库的文件名，要求打开该数据库并显示其内容。程序文件名为 PA1.PRG。

　　MODI COMMAND PA1

　　SET TALK OFF

　　CLEAR

　　ACCEPT "请输入数据库名：" TO A

　　OPEN DATABASE &&A

　　ACCEPT "请输入表名：" TO B

　　USE &&B

　　LIST

　　USE

　　SET TALK ON

　　RETURN

　　8．WAIT 命令

　　【格式】WAIT [<提示信息>][TO<内存变量>] [WINDOW [AT<行>,<列>]] [NOWAIT] [CLEAR|NOCLEAR] [TIMEOUT<数值表达式>]

　　【功能】显示提示信息，暂停程序执行，直到用户按任意键或单击鼠标时继续执行程序。

　　若选择可选项[TO <内存变量>]，将输入的单个字符作为字符型数据赋给指定的<内存变量>；若用户是按Enter 键或单击鼠标，<内存变量>的值为空串。

　　若省略所有可选项，屏幕显示“键入任意键继续……”默认提示信息 。

　　【例】在STUDENT 数据库的STUD 表中显示任意一个系学生的情况。

　　程序文件

　　名为PA2.PRG

　　SET TALK OFF

　　CLEAR

　　OPEN DATABASE 学生管理

　　USE 学生

　　WAIT "请输入待查学生的学号(1-3)：" TO N

　　IF VAL(N)<1 .OR. VAL(N)>3

　　WAIT "输入无效，结束程序运行！" WINDOW TIMEOUT 5

　　RETURN

　　ELSE

　　STORE "0"+N TO AAA

　　LIST FOR 学号=AAA

　　ENDIF

　　CLOSE DATABASE

　　SET TALK ON

　　RETURN

　　三条输入命令的异同

　　INPUT 命令可接受数值型、字符型、逻辑型、日期型和日期时间型数据，数据形式可以是常量、变量、函数和表达式，如果是字符串，需用定界符，输入完毕按回车键结束

　　ACCEPT 命令只能接受字符型数据，不需定界符，输入完毕按回车键结束；

　　WAIT 命令只能输入单个字符，且不需定界符，输入完毕不需按回车键；