2.3程序的基本结构(循环结构).ppt
2.3 程序的基本结构程序的基本结构程序的基本结构程序的基本结构1、顺序结构：按照由上到下的顺序一行一行、顺序结构：按照由上到下的顺序一行一行的执行。程序中没有分支，没有重复。的执行。程序中没有分支，没有重复。2、选择结构：也叫、选择结构：也叫分支结构分支结构，根据不同的条，根据不同的条件判断来决定程序走向结构。件判断来决定程序走向结构。3、循环结构：根据条件判断，需要重复执行、循环结构：根据条件判断，需要重复执行某一段代码的程序。程序中可能存在分支某一段代码的程序。程序中可能存在分支和重复。和重复。顺序结构的特点：顺序结构的特点：1.执行过程是按顺序从第一条语句执行到最后一条语句。2.在程序运行的过程中，顺序结构程序中的任何一条语句都要运行一次，而且也只能运行一次。顺序结构顺序结构 顺序结构是最简单的程序结构，它是由若干个依次执行顺序结构是最简单的程序结构，它是由若干个依次执行的处理步骤组成的。如图，的处理步骤组成的。如图，A语句和语句和B语句是依次执行语句是依次执行的，只有在执行完的，只有在执行完A语句后，才能接着执行语句后，才能接着执行B语句。语句。顺序结构顺序结构举例：输入两个数，然后交换这两个数，再输出它们交换后的结果。（1）分析问题。分析问题。要交换两个数，要利用几个变量来保存数据？1、顺序结构、顺序结构（2）分析程序的执行步骤，画出流程图。第一步：输入两个变量a、b的值。第二步：利用第三个变量c来进行交换，交换的过程如下：c=a a=b b=c第三步：输出交换后a、b的值。顺序结构顺序结构（3）讲解程序的编写。Private Sub command1_Click（）Dim a as single,b as single,c as singlea=val(InputBox（输入第一个数a：）)b=val(InputBox（输入第二个数b：）)Print 交换前：a=;a,b=;bc=aa=bb=c MsgBox 交换后a=&a&b=&b,vbokonly,交换结果End Sub顺序结构顺序结构 在处理实际问题时，只有顺序结构是不够的，经常会遇到一些条件的判断，流程根据条件是否成立有不同的流向。如下图所示，程序根据给定的条件P是否成立而选择执行A操作或B操作这种先根据条件做出判断，再决定执行哪一种操作的结构称为分支结构，也称为选择结构。2、选择结构、选择结构应用举例：判断输入的一个正整数，是偶数还是奇数。（1）分析问题。提示要判断一个正整数是偶数还是奇数，判断的条件是什么？选择结构选择结构（2）分析程序的执行步骤，画出流程图。第一步：输入一个正整数N；第二步：判断N是否能被2整除，即判断条件N mod 2=0是否成立；第三步：若判断条件成立，则输出该正整数是偶数，否则输出该正整数是奇数选择结构选择结构（3）讲解程序的编写。Private Sub command1_Click（）N=InputBox（输入一个正整数：）If N mod 2=0 ThenPrint N;是偶数。ElsePrint N;是奇数。End IfEnd Sub选择结构选择结构课堂练习1、输入课本33页代码，进行连个数的交换2、编写代码：输入一个数，判断它的奇偶性。If 语句：单分支、双分支与多分支语句语句：单分支、双分支与多分支语句单分支形式：If then 语句或与语句组 End If如：If(N mod 2=0)Then Print N;是偶数。Else选择结构的分支语句选择结构的分支语句双分支形式：If then 语句或与语句组1 Else 语句或与语句组2 End If如：如：If(N mod 2=0)Then Print N;是偶数。Else Print N;是奇数。End If选择结构双分支结构举例：课本双分支结构举例：课本34页页输入飞船速度，判断飞船是否能升空。输入飞船速度，判断飞船是否能升空。（飞船运行状态判断：只有当飞船的速度达到第一宇宙速度（7.9千米/秒）时，才可以在地球吸引力作用下，绕地球近似做匀速圆周运动。）代码如下：代码如下：private Sub cmdOk_Click（）Dim v As Single v=Val(InputBox(输入速度（输入速度（km/s）)If v=7.91 Then lblshow.Caption=飞船成功飞行飞船成功飞行!Else lblshow.Caption=飞船不能升空飞船不能升空!End If End sub表表2-11 飞船的飞行状况飞船的飞行状况飞船速度（飞船速度（v）(单位：单位：km/s)飞行状况飞行状况7.9v16.67飞船挣脱太阳引力飞出太阳系选择结构多分支形式：If then 语句或与语句组1 Else 语句或与语句组2 .End If用用If 多分支多分支 语句判断飞船飞行状况语句判断飞船飞行状况Private Sub command_Click（）（）Dim v As Single v=Val(InputBox(输入速度（输入速度（km/s）：）：)If v 16.67 Then Print 飞船挣脱太阳吸引力飞出太阳系飞船挣脱太阳吸引力飞出太阳系 Else If v=11.19 Then Print 飞船离开地球的控制飞船离开地球的控制,围绕太阳转围绕太阳转 Else If v=7.91 Then Print 飞船绕地球近似做匀速圆周运动飞船绕地球近似做匀速圆周运动;Else Print 输入数据错误输入数据错误 End If End If End If End sub当程序出现多分支选择时，用当程序出现多分支选择时，用if语句会比较繁琐，而使用多语句会比较繁琐，而使用多分支选择分支选择select case 语句就方便多了。语句就方便多了。语法格式：select case 表达式 case 表达式列表1 语句组1 case 表达式列表2 语句组2 .case else 语句组n end select用用select case 语句判断飞船飞行状况语句判断飞船飞行状况Private sub cmdOk_click Dim v as single v=val(InputBox(输入速度v(km/s)select case v case Is 16.67 lblshow.caption=太阳飞出太阳系 case Is=11.19 lblshow.caption=绕太阳运行 case Is=7.91 lblshow.caption=绕地球运行 case else lblshow.caption=数据输入错误 End selectEnd sub课后练习课后练习-用用select case语句编写以下代码语句编写以下代码 例子：输入一学生的成绩，评定其等次。方法是：90100分为优秀，8089分为良好，7079分为中等，6069分为及格，60分以下为不及格。课后练习课后练习-用用select case 语句编写成绩等次：语句编写成绩等次：private sub command_click dim x as single x=val(inputbox(输入一个分数：输入一个分数：)select case x case is=90 lblshow.caption=优秀优秀 case is=80 lblshow.caption=良好良好 case is=70 lblshow.caption=中等中等 case is=60 lblshow.caption=及格及格 case else lblshow.caption=不及格不及格 end selectend sub小结分支结构的特点:分支结构是根据不同的条件判断来决定程序执行走向的结构。在程序运行的过程中，在分支结构内，无论P条件是否成立，只能执行A操作或B操作之一，不可能既执行A操作又执行B操作，也不可能A操作和B操作都不执行。选择结构选择结构 有时在解决一些问题时，经常需要重复执行一些操作，如计算123+100的和，我们可以利用循环结构控制程序按照一定的条件或者次数重复执行。需要重复执行同一操作的结构称为循环结构，即从某处开始，按照一定条件反复执行某一处理步骤，反复执行的处理步骤称为循环体循环体。循环结构循环结构应用举例：累加求和。题目：计算123+10的和。（1）分析问题。提示进行累加运算，可先设累加变量的值为0，还要准确理解循环次数次数，避免出现多一次循环或少一次循环的情况。循环结构循环结构（2）分析程序的执行步骤，画出流程图。第一步：使累加变量S的值为0；第二步：循环变量i的初值为1，终值为10，步长值为1；第三步：判断循环条件i10是否成立，成立，则输出累加变量S的值，否则S=S+i，i=i+1，重复第三步。循环结构循环结构题目：计算题目：计算123+10的和的和。计算步骤：设循环次数为计算步骤：设循环次数为i,累加量为累加量为s=0(初始值初始值)循环次数：si=1:1 i=2:1+2=3 i=3:3+3=6i=4:6+4=10i=5:10+5=15i=6:15+6=21i=7:21+7=28i=8:28+8=36i=9:36+9=45i=10:45+10=55 i=11(i10)End(退出)循环体:s=s+i循环次数：i=i+1（3）讲解程序的编写。Private Sub command1_Click（）Dim i As Integer,s As IntegerS=0For i=1 To 10 Step 1S=S+iNext iPrint 1+2+3+10的和是;SEnd Sub循环结构循环结构:用用for.Next 语句语句（4）讲解程序的编写。Private Sub command1_Click（）Dim i As Integer,s As Integeri=0s=0Do While s=1000i=i+1s=s+iLooplblSum.Caption=i&次循环次数的和才能超过1000End Sub循环结构循环结构:用用Do While.Loop 语句语句课堂练习课本39页1、编程计算 s=1+2+3+.+100的值。2、编程计算1到100之间所有偶数的和3、用VB的循环语句求1到10的奇数和与偶数积（选作）选作）编程计算1到100之间所有偶数的和Private Sub Command1_Click()Dim i As Integer,sum As Double sum=0 For i=1 To 100 If i Mod 2=0 Then sum=sum+i End If Next iPrint 1到100之间所有偶数的和;sumEnd sub用VB的循环语句求1到10的偶数积偶数积与奇数和奇数和Private Sub Command1_Click()Dim i As Integer,sum As Integer,aa As Doubleaa=1 For i=1 To 10 If i Mod 2=0 Then aa=aa*i Else sum=sum+i End If Next iPrint aa,sumEnd Sub小结循环结构的特点:循环结构中通常都有一个起循环计数作用的变量，这个变量的取值一般都包含在执行或终止循环的条件中。循环结构主要用在一些有规律的重复计算的算法中，例如累加求和、累乘求积等问题。循环结构循环结构小结顺序、分支和循环三种程序基本控制结构的共同特点：三种结构都是只有一个入口，一个出口。三种结构内都不存在死循环，即无终止的循环，像下图的结构中就存在一个死循环，在程序中是不允许死循环出现的。总结总结本节课我们学习了三种结构：顺序结构、分支结构和循环结构。顺序结构：按照由上到下的顺序一行一行地执行的程序结构。分支结构：根据不同的条件判断来决定程序执行走向的结构。循环结构：需要重复执行同一操作的程序结构称为循环结构。我们灵活运用这三种基本结构，就可以编写出各种各样的程序，解决许多实际的问题。
