第六章 程序设计基础一、考试大纲要求1、了解（1）应用程序的调试（2）局部变量和全局变量（3）命令运行中的环境设置2、掌握（1）程序文件的建立。（2）子程序的设计与调用。（3）过程与过程文件、过程调用中的参数传递。3、重点掌握 （1）简单的交互式输入输出命令 （2）顺序结构程序设计 （3）选择结构程序设计 （4）循环结构程序设计二、知识要点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 【功能】执行指定、下的程序文件注意： 执行程序文件时，将依次执行文件中的命令，直到所有命令执行完毕。以下是终止程序运行的几个常用命令：CANCAL:终止程序运行，清除所有私有变量，返回命令窗口。DO：转去执行另一个程序。RETURN：结束当前程序的执行，返回到调用它的上级程序，若无上级程序则返回到命令窗口。QUIT：退出VF系统，返回到操作系统。【例题】1在Visual FoxPro中，程序文件的扩展名为_。 A.prg B. qpr C.scx D.sct 解析 本题考查的知识点是程序文件的扩展名。在V1sual FoxPro中，程序文件的扩展名为prg。 答案A是程序文件的扩展名。选项B是生成的查询程序文件的扩展名。选项C是表单文件的扩展名。选项D是表单备注文件的扩展名。 答案 A2在Visual FoxPro中，用来建立程序文件的命令是_。 AOPEN COMMAND文件名 BCREATE COMMAND文件名 CMODIFY COMMAND文件名 D以上答案都不对解析 本题考查的知识点是建立程序文件的命令的使用。在Visual FoxPro中，建立程序文件的命令是 MODIFY COMMAND文件名。 选项A和B语法错误。选项C是建立程序文件的命令。选项 D的说法错误 答案 C5任意类型数据的输入命令 INPUT 【格式】INPUT TO 【功能】在程序执行过程中，将用户交互式输入的内容赋值给指定内存变量 ,可以输入字符型、数值型、逻辑型、日期型和日期时间型等类型数据，而且可以是常量、变量、函数或表达式等形式，按回车键结束输入，系统将输入的数据赋值给。注意：（1）如果选用，那么系统会首先显示该表达式的值，作为提示信息。（2）输入的数据可以是常量、变量、表达式。但不能不输入任何内容直接按回车。（3）输入字符串时必须加定界符，逻辑常量必须用圆点定界，日期常量用大括号（如2004-12-23）举例 （1）.输入“张航”到XM变量中。 INPUT ”请输入员工姓名：” TO XM 请输入员工姓名：”李小林” ? XM 李小林 （2）.输入逻辑值到HF变量中表示婚姻状况。 INPUT ”已婚否：” TO HF 已婚否：.T. ? HF.T.6字符串类型数据输入命令 ACCEPT 【格式】ACCEPT TO 【功能】在程序执行过程中，将用户交互式输入的内容作为字符串赋值给指定内存变量。 该命令只接受字符型数据，输入的字符串不需要加定界符注意：（1）如果选用，那么系统会首先显示该表达式的值，作为提示信息。（2）该命令只能接收字符串。在输入字符串时不需要加定界符。（3）如果不输入任何内容直接按回车。系统会把空串赋给指定的内存变量。【例1】输入“平衡”到XM变量中。 ACCEPT ”请输入教师姓名：” TO XM 请输入教师姓名：平衡 ? XM 平衡【例2】编程从键盘输入某数据库的文件名，要求打开该数据库并显示其内容。程序文件名为 PA1.PRG。MODI COMMAND PA1SET TALK OFFCLEARACCEPT 请输入数据库名： TO AOPEN DATABASE &AACCEPT 请输入表名： TO BUSE &BLISTUSESET TALK ONRETURN7单个字符输入WAIT命令【格式】WAIT TO WINDOW AT, NOWAIT CLEAR|NOCLEAR TIMEOUT【功能】显示提示信息，暂停程序执行，直到用户按任意键或单击鼠标时继续执行程序。 若选择可选项TO ，将输入的单个字符作为字符型数据赋给指定的；若用户是按Enter键或单击鼠标，的值为空串。若省略所有可选项，屏幕显示“键入任意键继续”默认提示信息 。【例】在STUDENT数据库的STUD表中显示任意一个系学生的情况。程序文件 名为PA2.PRGSET TALK OFFCLEAROPEN DATABASE 学生管理USE 学生WAIT 请输入待查学生的学号(1-3)： TO NIF VAL(N)3WAIT 输入无效，结束程序运行！ WINDOW TIMEOUT 5RETURNELSESTORE 0+N TO AAALIST FOR 学号=AAAENDIFCLOSE DATABASESET TALK ONRETURN三条输入命令的异同INPUT命令可接受数值型、字符型、逻辑型、日期型和日期时间型数据，数据形式可以是常量、变量、函数和表达式，如果是字符串，需用定界符，输入完毕按回车键结束ACCEPT命令只能接受字符型数据，不需定界符，输入完毕按回车键结束； WAIT命令只能输入单个字符，且不需定界符，输入完毕不需按回车键；程序结构 是指程序中命令或语句执行的流程结构。Visual FoxPro提供了三种基本结构： 顺序结构、选择结构、循环结构。顺序结构程序设计 是程序中最简单、最基本的结构。使用该结构只需先把过程的各个步骤详细列出，然后将有关命令按处理的逻辑顺序自上而下排列起来。Visual FoxPro就能按程序排列的顺序，一条接一条地依次执行。分支结构形式：（1）单向分支 单向分支语句，即根据用户设置的条件表达式的值，决定某一操作是否执行。 （1）语句格式： IF条件表达式 命令行序列 ENDIF （2）语句功能： 该语句首先计算条件表达式的值，当条件表达式的值为真时，执行命令行序列；否则，执行ENDIF后面的第一条命令。【例】求一元二次方程AX2BXC0的实根。程序文件名为PA3.PRG。SET TALK OFFCLEARINPUT A= TO AINPUT B= TO BINPUT C= TO CZ=B2-4*A*CIF Z=0X1=(-B+SQRT(Z)/(2*A)X2=(-B-SQRT(Z)/(2*A)? X1,X2ENDIFSET TALK ONRETURN（2）双向分支 双向分支语句，即根据用户设置的条件表达式的值，选择两个操作中的一个来执行。1）语句格式： IF条件表达式 命令行序列1 ELSE 命令行序列2 ENDIF2）语句功能： 该语句首先计算条件表达式的值，当条件表达式的值为真时，执行命令行序列1中的命令；否则，执行命令行序列2中的命令；执行完命令行序列1或命令行序列2后都将执行ENDIF后面的第一条命令。【例题】编写一密码校验程序（假设密码为ABC）。程序文件名为PA4.PRG。SET TALK OFFCLEARACCEPT “请输入您的密码：” TO AAAIF AAA=”ABC”CLEAR? ”欢迎使用本系统！”ELSE? ”密码错误！”WAITQUITENDIFSET TALK ON(3)多向分支 多向分支语句，即根据多个条件表达式的值，选择执行多个操作中的一个对应执行 。（1）语句格式： DO CASE CASE条件表达式1 命令行序列1 CASE条件表达式2 命令行序列2 CASE条件表达式N命令行序列N OTHERWISE 命令行序列N+1 ENDCASE【例】假设收入（P）与税率（R）的关系如下表，编程求税金。程序文件名为PA5.PRG。 0 P800R= 0.05 800 P2000 0.08 20