资源描述：
《沈阳农业大学vf课件第六章》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、1第六章结构化程序设计2第6章结构化程序设计6.1程序设计6.2VFP程序设计基础6.3程序的控制结构6.4多模块程序36.1程序设计程序:（Program）是一组能够完成特定任务的指令序列，按照特定的逻辑关系以一定的结构组织在一起，并以文件的形式存储在计算机外部设备上。程序设计:根据特定的问题，使用某种程序设计语言编写的，计算机可以执行的指令序列。46.2VFP程序设计基础程序基本操作步骤：1.文件—新建—程序2.输入程序语句3.保存文件名为：pro14.程序—运行—pro1x=34y=45z=67?x+y+z?(x+y+z)/3例：求三个数的总和及平均值。5命令方式：1.建立
2、或修改程序：modifycommand程序名4.运行程序：do程序名注意：程序文件扩展名：prginput提示信息to内存变量accept提示信息to内存变量wait提示信息to内存变量输入命令注意：input命令可用于各种类型数据的输入,输入字符型数据需要加定界符。Accept命令只限于输入字符型数据。输入时内容不需要加定界符。Wait一般起到等待的作用。7ClearUsedjksaccept“请输入考号:”tox&&将accept改成input再运行Locafor考号=xDisp考号,姓名,笔试,上机,结论Usewait"谢谢使用!"windowstimeout3return
3、例：成绩查询。8在程序开始使用note加注释。在语句前用*加注释。在语句后用&&加注释。加注释9ClearSettalkoffUsexsdaaverage成绩Settalkonaverage成绩settalkon/off作用：关闭对话状态。Setsafetyon/off作用：提供或取消安全保护。usexsdacopytoabcuseabczapsetsafetyoffzap10setheadingon/off显示/不显示字段名usexsdadispsetheadingoffdisp?date()?time()??date()@10,10saydate()??不换行显示@在第几行第
4、几列显示内容116.3程序的基本控制结构6.3.1顺序结构6.3.2选择结构6.3.3循环结构126.3程序的基本控制结构顺序，选择，循环三种基本结构一.顺序结构按照程序语句一条一条的顺序的往下执行。二.选择结构根据不同的条件，选择执行不同的程序语句，用来解决有选择，有转移的诸多问题。三.循环结构使一些语名重复地执行若干次。13顺序结构流程图程序语句1程序语句2……6.3.1顺序结构14双分支选择结构流程图条件？语句序列1语句序列2其它语句YESNO15条件？YES程序语句其它语句NO循环结构流程图16[例]:查找djks表中有没有叫刘宁这个学生，显示有关信息。ClearUsed
5、jksLocafor姓名=“刘宁"Disp考号,姓名,笔试,上机,结论Usereturn结束清除屏幕打开djks表查找名为刘宁的记录显示该学生的情况关闭表程序流程示意图17顺序结构课堂练习：任意输入四个数，找出四个数的最大值和最小值。提示1：任意输入一个数用input命令实现。例如：input“请输入第一个数”tox提示2:利用MAX（），MIN（）函数。例如：？MAX（4，5，6，2）值为618clearInput"请输入第1个数"tox1Input"请输入第2个数"tox2Input"请输入第3个数"tox3Input"请输入第4个数"tox4m=max(x1,x2,x3,x
6、4)n=min(x1,x2,x3,x4)?m,nreturn任意输入的四个数求出最大值和最小值输出结果程序结束答案:196.3.2选择结构基本形式有三种:单分支、双分支、多分支。1.单分支结构IF条件表达式命令行序列ENDIF语句格式：条件？语句序列ENDIF后续语句YES流程示意图NO20ClearUsedjksaccept"请输入考号:"toxLocafor考号=xiffound()Disp考号,姓名,笔试,上机,结论endifUsereturn单分支结构例：成绩查询，找到则显示成绩。212.双分支结构语句格式：IF条件表达式命令行序列1ELSE命令行序列2ENDIF功能:即
7、根据用户设置的条件表达式的值,选择两个操作中的一个来执行.22ClearUsedjksaccept"请输入考号:"toxLocafor考号=xiffound()Disp考号,姓名,笔试,上机,结论Else?"无此人“endifUsereturn双分支结构例：成绩查询，找到则显示成绩，没找到则显示无此人。23课堂练习任意输入一个数,如果这个数大于零则在屏幕上显示你好,否则在屏幕上显示再见。24答案input"请输入数:"toxifx>0?"你好"else?"再见"endif25cl
