《控制结构程序设计.ppt》由会员分享，可在线阅读，更多相关《控制结构程序设计.ppt（35页珍藏版）》请在三一办公上搜索。
1、第四章 三种基本结构程序设计,本章内容及要求：1.了解算法概念及算法的表示，掌握用NS流程序表示算法 2.熟练掌握赋值语句、End语句和注释语句等语句及输入/输出消息框函数的使用；3.熟练掌握行if语句、块if结构、Select Case情况选择结构有使用，掌握选择的嵌套结构；4.熟练掌握实现循环结构的For/Next循环结构及Exit For语句、Do/Loop循环结构的使用，掌握多重循环。,重点：选择结构及循环结构的实现及其应用,难点：选择的嵌套及多重循环结构,4.1 算法及算法的表示,4.1.1 算法概述 什么是算法：广义地讲：算法是为完成一项任务所应当遵循的一步一步的规则的、精确的、无
2、歧义的描述，它的总步数是有限的。狭义地讲：算法是解决一个问题采取的方法和步骤的描述。下面通过两个简单的例子加以说明：,例4.1 输入三个数，然后输出其中最大的数。将三个数依次输入到变量、B、C中，设变量MAX存放最大数。其算法如下：,例4.2 输入10个数，打印输出其中最大的数。算法设计如下：（1）输入1个数,存入变量A中,将记录数据个数的变量N赋值为1，即N=1（2）将A存入表示最大值的变量Max中，即Max=A（3）再输入一个值给A，如果AMax 则 Max=A,否则Max不变（4）让记录数据个数的变量增加1，即N=N+1（5）判断N是否小于10，若成立则转到第（3）步执行，否则转到第（6
3、）步。（6）打印输出max,1)输入A、B、C。2)A与B中大的一个放入MAX中。3)把C与MAX中大的一个放入MAX中。4)输出MAX，MAX即为最大数。,4.1.2 算法的特性,有穷性确定性有0个或多个输入有一个或多个输出有效性,4.1.3 算法的表示 一、自然语言与伪代码表示算法自然语言：就是指人们日常使用的语言，可以是汉语、英语或其它语言。伪代码：是用介于自然语言和计算机语言之间的文字和符号（包括数学符号）来描述算法。例如：例4.1可用如下的伪代码表示Begin（算法开始）输入 A，B，C IF AB 则 AMax 否则 BMax IF CMax 则 CMaxPrint MaxEnd(
4、算法结束),二 用传统流程图表示算法,处理框,起止框,I/O框,判断框,流程线,连接点,1、传统流程图中的基本符号,2、三种基本结构的表示（1）顺序结构,条件,语句1,语句2,Y,N,语句1,语句2,（2）选择结构,条件,(a),条件,语句组,（3）循环结构,a)当型循环,b)直到循环,Y,N,Y,N,(b),语句组,三种基本结构的特点：,（1）只有一个入口（2）只有一个出口（3）不存在死语句（4）不存在死循环,例：例4.2输入10个数，打印输出其中的最大的数的流程图,从10个数中选出最大的数的流程图,N10,Max=A N=1,AMax,Max=A,输入A,开始,再输入给A,N=N+1,打印
5、Max,结束,Y,N,N,Y,4.1.4 用NS流程图表示算法,将全部算法写在一个矩形框内，在矩形内还可包含其它从属于它的框,三种基本结构的NS图表示：,语句A,语句B,语句A,语句B,条件,Y,N,1、顺序结构,2、选择结构,语句组,（3）循环结构,a)当型循环,b)直到循环,当条件成立,语句组,直到当条件成立,例：画出从10个数中选出最大的数的NS 流程图,(a),(b),传统流程图,N10,Max=A N=1,AMax,Max=A,输入A,开始,再输入给A,N=N+1,打印Max,结束,Y,N,N,Y,输入A,当N=10,Max=A,N=N+1,打印Max,输入A,NS流程图,A=Max
6、,Y,N,Private Sub Form_Click()Dim a%,max%,i%max=a For i=1 To 10 a=Val(InputBox(A=?)If a max Then max=a Next i Print Max=;maxEnd Sub,最后需要说明的是：上面介绍的算法表示是给人看的，即是为帮助程序开发人员阅读、编写程序而设计的一种辅助工具，程序则必须符一计算机语言的语法规则。下面是例4.2的计算机 程序，即为用计算机语言表示算法：,4.2 顺序结构,4.2.1 赋值语句 形式:变量名表达式 对象.属性表达式 功能：将表达式的值赋值给变量名或指定对象的属性。一般用于给变
7、量赋值或对控件设定属性值.例：sRate!=0.1 Text1.Text 欢迎使用Visual Basic 6.0”说明：1 执行过程：先求表达式的值，然后将值赋值给左边的变量。2 右边的表达式可以是变量、常量、函数调用等特殊的表达式。3 不要将“”理解为数学上的等号：A=A+1 是表示将A单元的值加后以放回到A单元。,执行过程如右图,4赋值符号“=”左边一定只能是变量名或对象的属性引用，不能是常量、符号常量、表达式。下面的赋值语句都是错的：5=X 左边是常量。Abs(X)=20 左边是函数调用，即是表达式。,5.赋值符号“=”两边的数据类型一般要求应一致。,4.2.2 数据的输出Print方
8、法,Print方法的一般格式：对象名.Print，|；,说明：对象名.可以是窗体名、图片框名，也可是立即窗口“Debug”。若省略对象，则表示在当前窗体上输出。在2.3节窗体对象的方法中对Print方法做了详细的介绍。用Print方法在图片框和立即窗口对象中输出与在窗体对象中输出完全相同。,4.2.3 用户交互函数和过程 1.InputBox函数变量名=InputBox$(，)其中:提示 提示信息,标题 标题区显示,缺省输入区缺省值 有$返回字符类型,否则为数值类型.例如，要在屏幕上显示如下的对话框:,例如：有下列语句如下:Dim strName As String*40，strS1 As S
9、tring*40 strS1=“请输入你的姓名”+Chr(13)+Chr(10)+“然后单击确定”strName=InputBox$(strS1，“输入框”，100，100)当键盘输入“王晓明”后,变量strName获得键盘输入的值.,2.MsgBox函数和MsgBox过程 函数形式:变量%=MsgBox(提示,按钮图标+缺省按钮+模式，标题)过程形式:MsgBox 提示,按钮图标+缺省按钮+模式,标题,说明：“标题”和“提示”与InputBox函数中对应的参数相同；“按钮图标+缺省按钮+模式”是整型表达式，决定信息框按钮数目、出现在信息框上的图标类型及操作模式(见表4.1)若程序中需要返回值
10、，则使用函数，否则可调用过程。,按钮及图标值如下:,根据用户所选按钮，函数返回17的整数值，其含义如下表:（表4.2),练习,在立即窗口中执行语句:a=MsgBox(“文件不存在!”,0,”打开文件”)a=MsgBox(“文件不存在!”,1,”打开文件”)a=MsgBox(“文件不存在!”,2,”打开文件”)a=MsgBox(“文件不存在!”,3,”打开文件”)a=MsgBox(“文件不存在!”,4,”打开文件”)Print a,练习,Dim passYesNo As StringPrivate Sub Command1_Click()passYesNo=IIf(Text1.Text=1234
11、56,口令正确！,口令错误！)MsgBox(passYesNo)End Sub,4.2.4 注释语句,其语法格式为：Rem 或 说明：1.指要包括的任何注释文本。在Rem关键字和注释内容之间要加一个空格。可以用一个英文单引号“”来代替Rem关键字。2.如果在其他语句行后面使用Rem关键字，必需用冒号(：)与语句隔开。若用英文单引号“”，则在其他语句行后面不必加冒号(：)。例如：Const PI=3.1415925 符号常量PIS=PI*r*r:Rem计算圆的面积,4.3 选择结构 1.IfThen语句(单分支结构)If Then 语句块 End If 或 If Then,例:已知两个数x和y，
12、比较它们的大小，使得x大于y.If xy Then t=x:x=y:y=t End If 或 If xy Then t=x:x=y:y=t,2.IfThenElse语句(双分支结构)If Then Else End If If Then Else,例如：输出x,y两个中值较大的一个值。IF XY Then Print XElse Print YEnd If也可以写成如下的单行形式：IF XY Then Print X Else Print Y,双分支选择结构执行过程,3.IfThenElseIf语句(多分支结构)形式:If Then Else If Then Else 语句块 n+1 End
13、If,例：输入一学生成绩，评定其等级。方法是：90100分为“优秀”，8089分为“良好”，7079分为“中等”，6069分为“及格”，60分以为“不合格”,执行过程,练习,使用IF语句实现的程序段如下：If x=90 thenPrint 优秀ElseIf x=80 ThenPrint 良好ElseIf x=70 ThenPrint 中等ElseIf x=60 ThenPrint 及格ElsePrint 不及格End If,4.3.2 Select Case语句（情况语句）形式：Select Case 变量或表达式Case 表达式列表1语句块1Case 表达式列表2语句块2Case Else语
14、句块n+1End Select：与同类型的下面四种形式之一：表达式 例:A+5 一组枚举表达式(用逗号分隔)2,4,6,8 表达式1 To 表达式2 60 to 100 Is 关系运算符表达式 Is 60,数值型或字符串表达式,例如：将例4.3 使用select case.语句来实现的程序段如下：Select Case x Case 90 to 100 Print 优秀 Case 80 to 89 Print 良好 Case 70 to 79 Print 中等 Case 60 to 69 Print 及格 Case Else Print 不及格End Select,设计一个求解一元二次方程的程
15、序,Dim X As Double,X1 As Double,X2 As DoubleDim Delta As Double,p As Double,q As Double a=Val(Text1.Text)b=Val(Text2.Text)c=Val(Text3.Text)If a=0 Then If b=0 Then Text4.Text=不是一个方程！Else X=-c/b Text4.Text=X=&Format(X,0.00)End If Else Delta=b 2-4*a*c Select Case Delta Case 0 X=-b/(2*a)Text4.Text=X1=X2&Format(X,0.00)Case Is 0 X1=(-b+Sqr(Delta)/(2*a)X2=(-b-Sqr(Delta)/(2*a)Text4.Text=X1=&Format(X1,0.00)&X2=&Format(X2,0.00)Case Is 0 p=-b/(2*a)q=Sqr(Abs(Delta)/(2*a)Text4.Text=X1=&Format(p,0.00)&+&Format(q,0.00)&i&X2=&Format(p,0.00)&-&Format(q,0.00)&i End Select End IfEnd Sub,
