第五章结构化程序设计和网络编程.pptVIP

第五章 结构化程序设计 与网络编程;5.1 样本程序分析 ;5.2 程序的编辑与执行 ;命令注释：“ * ”、“ ” “ * ” ：放于行首，整行成为注释内容 “ ” ：放于命令行尾，对当前的命令注释 常用的程序结束命令 RETURN：结束本程序，并返回调用程序，无上级程序，则返回命令窗口。 CANCEL：终止程序的执行，清除程序的私有变量，并返回命令窗口;菜单法 “文件”菜单→“新建”→选择“程序”→“新建文件” 注：此方法只能建立新程序文件。;VFP程序文件的基本类型;5.3 输入／输出语句;例2：请建立程序文件，输入下列语句。 *Ex1.prg ACCEPT ‘请输入X的值：’ TO X ACCEPT ‘请输入Y的值：’ TO Y ? X+Y 思考：在程序运行过程中，分别输入12、13 后，屏幕上的显示结果是什么？;WAIT 命令格式： WAIT [字符表达式 ][TO内存变量] ; [WINDOW[AT行，列]] [NOWAIT] ; [CLEAR|NOCLEAR][TIMEOUT数值表达式]; 例3：P86_【例4】 *Example_4.prg WAIT ”按任意键将显示系统日期 ” TIMEOUT 5 ? DATE() ;INPUT 命令格式： INPUT [字符表达式 ] TO 内存变量;例4：P86_【例5】 *Example_5.prg name= “程序设计语言” price=23 INPUT “请输入数据: ” TO X ? “X= ”, X ; 简单定位输入输出语句 ;说明： 行，列表示数据在窗口中显示的位置，均为数值型 SAY子句用来输出数据，GET子句用于输入及编辑数据 GET后的变量若是内存变量，则该变量必须具有初值，或用DEFAULT子句指定初值；若是字段变量，则显示当前记录该字段值，字段变量不能是备注型或通用型。 若想修改GET子句中变量的值，则必须用READ命令来激活;例5：P87_【例 6】 *Example_6.prg CLEAR X=SPACE(20) Y=0 @10,20 SAY ”请输入书名：” GET X @12,20 SAY ”请输入数量：” GET Y READ ? STR(Y,5)+ ”本”+ALLTRIM(X)+ ”的金额为：” ; +STR(12.4*Y,8,2) ;5.4~5.5 程序的基本结构 ;分支结构 单分支IF 语句 ( 简单分支结构 ) 流程图;例1：P88_【例7】求两个数中较大值 *Example_7.prg INPUT “请输入一个数: ” TO X INPUT “请输入另一个数: ” TO Y max=X IF maxY max=Y ENDIF ? “ X和Y中较大值是: ”, max ;双分支IF语句 (带ELSE的分支结构) 流程图 ;例2：P88_【例8】求两个数中较大值 *Example_8.prg INPUT “请输入一个数: ” TO X INPUT “请输入另一个数: ” TO X IF XY max=X ELSE max=Y ENDIF ? “ X和Y中较大值是：”, max ; IF语句的嵌套 基本流程图;例3：P89_【例 9】分段函数程序 ;多分支结构 流程图;例4：P90_【例 10】用DO CASE语句实现例9中的分段函数 *Example_10.prg INPUT “请输入一个数：” TO X IF TYPE(‘X’)=‘N’ DO CASE CASE X0 Y=X^2-1 CASE X=0 Y=0 CASE X=10 Y=X^3+1 OTH