第4章 程序设计初步

中篇程序设计4程序设计初步重点与难点

1、程序文件的建立和修改2、程序的控制结构：

三种结构

顺序结构选择（分支）结构循环结构程序设计4.1程序文件4.1.1程序文件的建立与执行一、程序文件的建立与修改命令格式：

modifycommand<文件名/？>功能：打开文件编辑窗口，用来建立或修改程序文件参数描述：[<文件名>]：为可选项，指定打开或创建的程序文件名。若不指定新建程序文件的扩展名，VFP自动指定.PRG为扩展名。MODIFYCOMMAND命令支持含有“*”和“？”通配符的文件。名称与这个匹配的每一个文件都在编辑窗口中打开。若省略文件名，将给打开的编辑窗口赋一个初始名称“程序1.PRG”。当关闭编辑窗口时，可以用另外的文件名保存该文件。[？]：显示“打开”对话框。可以从中选择一个已有程序或输入要创建的新程序名。程序设计初步二、运行程序:下面任一方法均可运行程序1选择【程序】菜单下的“运行”菜单，利用“运行”对话框选择要运行的程序；2在命令窗口中输入如下命令：

DO<文件名>系统就会运行这个程序。如果文件不加扩展名，系统会假定它具有.PRG的扩展名，如果想运行一个具有其它扩展名的命令文件时，在输入命令时必须给出这个命令文件的全名。如：DOL501然后按回车键执行。程序设计初步

三、程序书写规则1命令分行程序中每条命令都以回车键结尾，一行只能写一条命令。若命令需分行书写，应在一行末尾键入续行符“；”，然后按回车键。2命令注释注释行以符号“*”开头。命令后也可添加注释，这种注释以符号“&&”开头程序设计初步

四、求解的基本逻辑与程序通用性1求解的基本思路解决问题的基本思路是：输入数据→处理数据→输出数据.例如：计算圆面积，须依次完成下列操作：（1）给出圆半径（2）按公式s=∏r2计算圆面积（3）输出圆面积VFP程序用命令来描述这个过程：

r=3s=3.1416*r*r?“圆面积=”,s程序设计初步4.1.2程序文件中的专用命令一、程序结尾的专用命令return：在程序的末尾，使程序执行结束，并返回到调用它的上级程序继续执行，若无上级程序则返回到命令窗口。cancel:是程序终止，清除程序的私有变量，并返回到命令窗口。quit：退出VFP系统。程序设计初步二、输入输出专用命令

格式：@<行号,列号>SAY<表达式>[get<变量名>][default<表达式2>]功能：从指定的行、列号开始输出表达式的值。说明：1<表达式>可以是常数、字段变量及由它们组成的表达式。2定位输出时，一次只能输出一个表达式。

程序设计初步3.GET子句中的变量必须具有初值，或用DEFAULT子句的<表达式指定>初值。初值一旦指定，该变量的类型在编辑期间就不能改变。

4.GET子句的变量必须用READ命令来激活，即在若干带有GET子句的输入输出命令后，必须遇到READ命令才能编辑GET变量。

例：试编一程序，输入半径值，求面积。clearr=0@2,10SAY“请输入半径：”GETrREADs=3.14159*r*r@4,10SAY“圆的面积为：”+str(s,8,3)程序设计初步三、WAIT命令命令格式：

wait[<信息文本>][to<内存变量>]功能：暂停程序的运行，直到用户输入一个字符，例如输入Y或N。也可只用输出一条提示信息例如：wait“请检查输入内容”程序设计初步四、accept命令命令格式：

accept[<信息文本>]to<内存变量>功能：暂停程序的运行，直到用户输入一串字符。例如：accept“请输入姓名：”tonn程序设计初步五、input命令命令格式：

input[<信息文本>]to<内存变量>功能：暂停程序的运行，直到用户输入.可以输入字符，数值，等各种类型的数据例如：clearinput"请输入半径："tor s=3.14159*r*r ?"圆的面积为：" ??S程序设计初步input命令可以出入字符类型，注意输入时要加定界符。可以输入数值型数据。可以输入逻辑型数据，加圆点定界符可以输入日期类型的数据，输入时可以用ctod函数进行转换，或{^yyyy-mm-dd}格式输入。4.2程序的控制结构

顺序结构程序运行时按语句排列的先后顺序，一条一条地依次执行。

程序设计初步AB例如：从键盘输入两个数据，通过程序交换两个数，并输出。AB程序设计初步分支结构一、简单的条件语句格式：IF<逻辑表达式><语句序列>ENDIF语句序列P.T.程序设计初步二、带ELSE的条件语句

格式：IF<条件表达式> <语句序列1> [ELSE <语句序列2>] ENDIF

语句序列2语句序列1P例如：从键盘输入一个数据，通过程序判断该数是偶数还是奇数？程序设计初步

宏代换函数：格式：&<字符型内存变量>功能：替换出字符型内存变量的值例如：m=5x=“m”?X&&显示m?&x&&显示5，得到了变量X的值程序设计初步三、多分支语句格式：DOCASECASE<条件表达式1> <语句序列1>[CASE<条件表达式2> <语句序列2> …CASE<条件表达式N> <语句序列N>][OTHERWISE<语句序列N+1>]ENDCASE

INPUT"请输入成绩（1--5）："toxDOCASEcasex=5?space(10)+"excellent"casex=4?space(10)+"Good"casex=3?space(10)+"Pass"casex=2?space(10)+"Fail"OTHERWISE:?space(10)+"Poor"ENDCASE

例如：从键盘输入成绩，给出评语。程序设计初步

循环结构(条件循环,步长循环,扫描循环）

一、条件循环

格式：DOWHILE<条件表达式> [<语句序列>] [EXIT] [LOOP] ENDDO例如：输出100内的偶数I=0DOWHILEI<=100??II=I+2ENDDOP语句序列FT参数描述：

<条件表达式>：指定一个逻辑表达式，它的值决定是否执行DOWHILE和ENDDO之间的命令集合。如果<条件表达式>的值为“真”，就执行命令集。

[<语句序列>]：指定当<条件表达式>计算为“真”时要执行的VFP命令集。

[LOOP]：直接将程序控制返回到DOWHILE语句，并重新计算条件值。LOOP可以放在DOWHILE和ENDDO之间的任何位置。

[EXIT]：将程序控制从DOWHILE和ENDDO循环的内部转到ENDDO后的第一条命令。EXIT可以放在DOWHILE和ENDDO之间的任何位置。

ENDDO：表明DOWHILE语句的结束

程序设计初步

二、步长循环格式：FOR<内存变量>=<初始值>TO<终值>[STEP<步长>] <语句序列> [EXIT] [LOOP] ENDFOR/NEXT

P语句序列FT

参数描述：

<内存变量>：指定作为计数器的内存变量或数组元素。在执行FOR…ENDFOR语句之前，此内存变量或数组元素不一定存在。

<初始值>TO<终值>：<初始值>是计数器的初始值，而<终值>是计数器的终止值。

[STEP<步长>]：是计数器递增或递减的步长。如果<步长>是负值，则计数器递减；如果省略STEP子句，计数器每次递增1。

<语句序列>：指定要执行的VFP命令，它可以包含任意数量的命令。

程序设计初步例：求1到100中偶数的和

AA=0FORI=2TO100STEP2 AA=AA+IENDFOR？AA程序设计初步

三、扫描循环格式：SCAN[<范围>][FOR<条件>][WHILE<条件>] [<语句序列>] [LOOP] [EXIT] ENDSCAN功能：针对表的记录操作的循环函数。扫描表的所有记录执行相应的语句序列。例如：use学生成绩表scanfor性别=“女”？？编号，姓名endscan

参数描述：

[<范围>]：指定对当前表中记录扫描的范围。只有在范围之内的记录才有可能扫描到。SCAN命令的默认范围为ALL。

[FOR<条件>]：只有条件表达式的计算结果为“真”的记录，才能对其执行命令。包含FOR子句可以筛选出不想扫描的记录。

[WHILE<条件>]：指定一个逻辑表达式作为执行命令的条件，只要逻辑表达式计算为“真”，就对记录执行命令，直到遇到使表达式不为“真”的记录为止。

[<语句序列>]：指定要执行的VFP命令集。

【例】逐条显示STUDENT表中男生的情况。USESTUDENTSCANFOR性别=”男” DISP WAITENDSCANUSE或者使用下列代码USESTUDENTSCAN IF性别#”男” LOOP ENDIFDISP WAITENDSCANUSEVFP6程序文件练习1、VFP有两类工作方式，分别是（）和（）。2、VFP程序设计包括结构化程序设计和（）。建立程序3、建立或修改程序文件的命令是（），程序文件的扩展名是（）。4、关闭窗口的方法有几种，分别是什么？5、文本编辑窗口只能编辑.prg文件吗？运行程序6、执行程序文件的命令是（），其中的文件名是否可以不加扩展名.prg？程序书写规则7、有关命令分行的规则是什么？8、有关命令注释的规则是什么？退出VFP6程序文件9、VFP程序解决问题的基本逻辑是（）。10、什么是程序的通用性，试举例说明？程序结尾的专用命令11、RETURN命令的功能是什么？12、CANCEL命令的功能是什么？13、QUIT命令的功能是什么？定位输入输出命令@<行，列>[SAY<表达式1>][GET<>][DEFAULT<>]输出提示信息14、WAIT命令宏代换函数15、&<字符型内存变量>[.<字符表达式>]

一、选择题1.一个过程文件可以包含多个过程，每个过程的第一条语句是A)PARAMETERB)DO<过程名>C)<过程名>D)PROCEDURE<过程名>2.比较WAIT、ACCEPT和INPUT三条命令，需要以回车键表示输入结束的命令是A)WAIT、ACCEPT、INPUTB)WAIT、ACCEPTC)ACCEPT、INPUTD)INPUT、WAIT程序设计测验第3题阅读下列程序，此程序执行后的输出结果是3。SETTALKOFFX=1DOWHILEX<20X=5*XENDDO？XSETTALKON3.A）5B）25C）50D）125第4题下列程序的执行结果是4。SETTALKOFFS=0FORI=1TO5S=S+IENDFOR？SSETTALKON4.A）10B）15C）20D）25第3题阅读下列程序，此程序执行后的输出结果是3。SETTALKOFFX=1DOWHILEX<20X=5*XENDDO？XSETTALKON3.A）5B）25C）50D）125第4题下列程序的执行结果是4。SETTALKOFFS=0FORI=1TO5S=S+IENDFOR？SSETTALKON4.A）10B）15C）20D）25第5题执行下列程序，其输出结果是5。SETTALKOFFX=[13+7]?XSETTALKON5.A）[13+7]B）20C）13+7D）20.006．有如下程序主程序：ZCX.PRG子程序：ZCX1.PRGSETTALKOFFK1=K1+'200'K1='12'RETURN？K1DOZCX1？K1RETURN用命令DOZCX运行程序后，屏幕显示的结果为A)12B)12C)12D)1220021212200127．执行如下程序SETTALKOFFS＝0I＝1INPUT“N＝？”TONDOWHILES<＝NS＝S＋II＝I＋1ENDDO？SSETTALKON如果输入N值为5，则最后S的显示值是A)1B)3C)5D)68.在VFP中，用于建立过程文件PROG1的命令是A)CREATERPOG1B)MODIFYCOMMANDPROG1C)MODIFYPROG1D)EDITPROG19.有如下程序SETTALKOFFCLEARAA=“全国计算机等级考试”BB=“九八”CC=“一”?AA??BB+“年第”+CC+“次考试”执行程序后，屏幕显示A)全国计算机等级考试九八年第一次考试B)全国计算机等级考试九八年第一次考试C)全国计算机等级考试BB年第CC次考试D)全国计算机等级考试BB年第CC次考试10.有程序如下SETTALKOFFUSECJM->ZF=0DOWHILE.NOT.EOF()M->ZF=M->ZF+ZFSKIPENDDO?M->ZFRETURN其中数据表文件CJ.DBF中有2条记录，内容如下：