结构化程序设计基础教学课件VF.ppt

第第6 6章章 结构化程序设计基础结构化程序设计基础吉林大学计算机教学与研究中心6.1 6.1 样本程序分析样本程序分析 MODIFY COMMANDMODIFY COMMAND Example_1 Example_1 INPUTINPUT “请输入数请输入数N:” N:” TO NTO N IFIF N 1 N 1 ? ? “输入的数输入的数: :”, , N N, , 太小！太小！ CANCELCANCEL ENDIFENDIF STORE 1 TO I,S STORE 1 TO I,S DO WHILEDO WHILE I = N I = N S=S*I S=S*I I=I+1I=I+1 ENDDOENDDO ? ? N N，“的阶乘是的阶乘是: :”, , S S CANCEL CANCEL【例【例1 1】求数】求数N N的阶乘的阶乘2 26.2 6.2 程序的建立与执行程序的建立与执行 VFPVFP源源程程序序是是用用VFPVFP命命令令或或程程序序中中专专用用语语句编写的文本文件，其扩展名是句编写的文本文件，其扩展名是PRGPRG6.2.1 VFP6.2.1 VFP专用程序编辑器专用程序编辑器建立源程序文件建立源程序文件方方法法一一：“文文件件”菜菜单单项项“新新建建”选选择择“程序程序”“”“新建文件新建文件”。

方法二：方法二：使用常用工具栏的使用常用工具栏的“新建新建”按钮3 36.2.1 VFP6.2.1 VFP专用程序编辑器专用程序编辑器说明说明1 1：此方法可以此方法可以建立建立新程序文件，又新程序文件，又可可修改修改已有的程序文件已有的程序文件方法三方法三：在命令窗口中执行命令：在命令窗口中执行命令： Modify Command 说明说明2 2：文件的扩展名可缺省，系统默认文件的扩展名可缺省，系统默认扩展名为扩展名为. .PRGPRG4 46.2.1 VFP6.2.1 VFP专用程序编辑器专用程序编辑器方方法法四四：在在项项目目管管理理器器中中，进进入入“代代码码”选选项卡，选择项卡，选择“程序程序”，单击，单击“新建新建”说明说明3 3：一个命令行中只能写一条命令，若一个命令行中只能写一条命令，若一行写不下，需使用分行符一行写不下，需使用分行符“; ;”5 56.2.1 VFP6.2.1 VFP专用程序编辑器专用程序编辑器 保存程序文件保存程序文件方法一：方法一：单击单击“文件文件”菜单项菜单项“保存保存”方方法法二二：单单击击“常常用用”工工具具栏栏里里的的“保保存存”按钮方法三：方法三：按按 Ctrl+W Ctrl+W 。

方方法法四四：关关闭闭程程序序编编辑辑器器，系系统统提提示示是是否否保保存文件6 66.2.2 6.2.2 打开源程序文件打开源程序文件方方法法一一：“文文件件”菜菜单单项项“打打开开”“”“文文件类型件类型”为为“程序程序”选择文件选择文件“确定确定”方方法法二二：单单击击“常常用用”工工具具栏栏里里的的“打打开开”按钮方法三：方法三：在命令窗口中执行命令：在命令窗口中执行命令： Modify Command | | ? ? 打开程序文件打开程序文件7 76.2.3 6.2.3 程序的编译与执行程序的编译与执行 在在VFPVFP中中，可可以以执执行行源源程程序序、编编译译程程序序、应用程序和可执行程序种程序文件应用程序和可执行程序种程序文件1 1）源源程程序序(PRG)(PRG)：源源程程序序是是文文本本文文件件，可可以以对对其其内内容容进进行行修修改改只只要要有有源源程程序序文文件件，就可以生成其他就可以生成其他3 3种程序文件种程序文件 执执行行程程序序就就是是按按照照程程序序的的内内部部控控制制结结构构执行文件中的相关语句序列执行文件中的相关语句序列 程序文件的类型程序文件的类型 8 86.2.3 6.2.3 程序的编译与执行程序的编译与执行（2 2）编编译译程程序序(FXP)(FXP)：每每个个源源程程序序文文件件都都有有对对应应的的编编译译程程序序文文件件，执执行行编编译译程程序序比比执执行行源程序的速度快。

源程序的速度快 （3 3）应应用用程程序序(APP)(APP)：由由多多个个文文件件（包包括括程程序序、表表单单和和菜菜单单等等）连连接接成成一一个个应应用用程程序序文文件注意：注意：以上三以上三种文件都是在种文件都是在VFPVFP环境下运行环境下运行 9 96.2.3 6.2.3 程序的编译与执行程序的编译与执行（4 4）可可执执行行程程序序(EXE)(EXE)：将将多多个个文文件件（包包括括程程序序、表表单单和和菜菜单单等等）连连接接成成一一个个可可执执行行程程序文件序文件, ,此种文件可以此种文件可以脱离脱离VFPVFP环境运行环境运行 编译程序编译程序 当当执执行行一一个个源源程程序序时时，系系统统自自动动将将其其编编译译为为编编译译程程序序(FXP)(FXP)在在VFPVFP中中允允许许只只编编译译而而不执行程序不执行程序10106.2.3 6.2.3 程序的编译与执行程序的编译与执行方法一：方法一：在程序编辑器中，单击在程序编辑器中，单击“程序程序”菜单项菜单项“编译编译”方方法法二二：单单击击“程程序序”菜菜单单项项“编编译译”选选择择“文文件件类类型型”为为“程程序序”选选择择程序文件程序文件“编译编译”编译方法为：编译方法为：11116.2.3 6.2.3 程序的编译与执行程序的编译与执行执行程序执行程序 方方法法一一：在在程程序序编编辑辑器器中中，“程程序序”菜菜单单“执行执行”或或“运行运行”常用工具常用工具“!”!”。

方方法法二二：“程程序序”菜菜单单“运运行行”选选择择“文文件件类类型型”为为“程程序序”选选择择或或输输入入程程序文件名序文件名“运行运行”方法三方法三：在程序或命令窗口中执行：在程序或命令窗口中执行： Do 12126.2.3 6.2.3 程序的编译与执行程序的编译与执行说明：说明：当源程序当源程序(PRG)(PRG)和编译程序和编译程序(FXP)(FXP)文件文件同时存在时，系统将执行距当前时间最近的同时存在时，系统将执行距当前时间最近的程序文件程序文件 13136.3.1 6.3.1 输入字符串语句输入字符串语句语句格式：语句格式： Accept To “字字符符表表达达式式”：作作为为执执行行到到此此语语句句时时的的提提示信息若无此项，则不输出任何信息若无此项，则不输出任何信息 内内存存变变量量：用用来来接接收收输输入入的的字字符符串串若若不不输输入任何字符，则将入任何字符，则将空字符空字符赋值给内存变量赋值给内存变量 例：例： Accept “Accept “请输入学号请输入学号:” To XH:” To XH? ”? ”输入的学号是：输入的学号是：”+XH +XH 14146.3.2 6.3.2 等待语句等待语句语句格式：语句格式：Wait To To Window At Window At ,NowaitNowait Clear|NoclearTimeout Clear|NoclearTimeout “字字符符表表达达式式”：提提示示信信息息。

若若无无此此项项，则则输出任何信息输出任何信息 To To 内内存存变变量量：用用来来接接收收输输入入的的字字符符若若不不输输入任何字符，则将入任何字符，则将空字符空字符赋值给内存变量赋值给内存变量 15156.3.2 6.3.2 等待语句等待语句Window Window AtAt,：使使用用WindowWindow项项表表示示在在VFPVFP主主窗窗口口的的右右上上角角弹弹出出提提示示信信息息窗窗口口也也可可以以使使用用AtAt, 指指定定提提示示信信息息窗窗口口的的开开始位置 WindowWindow和和NowaitNowait：弹弹出出提提示示窗窗口口后后，程程序序不不暂暂停停，即即不不等等用用户户按按键键，就就继继续续执执行行后后面面的的语句 WindowWindow和和 NoclearNoclear： 在在 执执 行行 下下 一一 条条 Wait Wait WindowWindow或或Wait Wait ClearClear语语句句之之前前，系系统统不不关关闭闭提提示信息窗口示信息窗口 16166.3.2 6.3.2 等待语句等待语句Timeout Timeout ：用用于于设设定定等等待待的的秒秒数数。

在在等等待待时时间间内内按按任任意意键键或或等等待待超超时时，程程序序将继续向下执行将继续向下执行 例：例：Wait Wait 显示时间：显示时间： Timeout 3 Timeout 3 ? Time() ? Time()17176.3.3 6.3.3 输入表达式语句输入表达式语句 语句格式：语句格式： Input To 说说明明：允允许许输输入入任任何何类类型型的的表表达达式式InputInput输输入字符串时必须加上定界符入字符串时必须加上定界符例：例：N=2N=2Input Input 请输入数据：请输入数据： To M To M? M? M18186.4.1 If6.4.1 If 分支语句分支语句 语句格式：语句格式： If Then Then 1 Endif开始开始语句语句序列序列结束结束条件条件?YN分支结构分支结构后面语句后面语句单分支单分支IfIf语句语句Y其其中中IF-ENDIFIF-ENDIF必必须须配对出现配对出现19196.4.1 If6.4.1 If 分支语句分支语句例：例：Input Input 请输入一个请输入一个N N： To N To NIf N0 If N0 N=-N N=-N EndifEndif? N? N的绝对值是：的绝对值是：, N, N20206.4.1 If6.4.1 If 分支语句分支语句双分支双分支IfIf语句语句 语句格式：语句格式： If ThenThen 1 ELSE Endif开始开始语句序列语句序列1结束结束条件条件?YN语句序列语句序列2分支结构分支结构后面语句后面语句21216.4.1 If6.4.1 If 分支语句分支语句例，求两个数中较小值：例，求两个数中较小值：Input X= To XInput X= To XInput Y= To YInput Y= To YIf XYIf X0）0 （X=0）1 （X0If X0Y=1Y=1ElseElseIf X=0If X=0Y=0Y=0ElseElseY=-1Y=-1EndifEndifEndifEndif? Y? Y24246.4.2 If6.4.2 If语句的嵌套语句的嵌套控制程序是否继续执行控制程序是否继续执行 例例 ：? DATE() & ? DATE() & 输出系统日期输出系统日期CANCEL & CANCEL & 结束本程序的执行结束本程序的执行? TIME() & ? TIME() & 此语句得不到执行此语句得不到执行（1 1）CancelCancel：结束当前程序的运行。

结束当前程序的运行25256.4.2 If6.4.2 If语句的嵌套语句的嵌套控制程序是否继续执行控制程序是否继续执行 （2 2）SuspendSuspend：暂暂停停程程序序的的执执行行暂暂停停期期间间可以在命令窗口中执行交互命令可以在命令窗口中执行交互命令3 3）ResumeResume：继继续续执执行行SuspendSuspend暂暂停停的的程程序，从序，从SuspendSuspend语句的下一条继续语句的下一条继续 例例6.9:6.9:X=1X=1SuspendSuspendY=2Y=2? X+Y? X+Y26266.4.3 6.4.3 条件函数条件函数 函数格式：函数格式： Iif(,)2) 说说明明：若若条条件件成成立立，则则表表达达式式1 1的的值值作。