2.3程序的基本结构(循环结构).ppt

（4）讲解程序的编写。 Private Sub command1_Click（） Dim i As Integer, s As Integer i = 0 s = 0 Do While s = 1000 i = i + 1 s = s + i Loop lblSum.Caption = i 次循环次数的和才能超过1000 End 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 i Print 1到100之间所有偶数的和; sum End sub 用VB的循环语句求1到10的偶数积与奇数和 Private Sub Command1_Click() Dim i As Integer, sum As Integer, aa As Double aa = 1 For i = 1 To 10 If i Mod 2 = 0 Then aa = aa * i Else sum = sum + i End If Next i Print aa, sum End Sub 小结循环结构的特点: ① 循环结构中通常都有一个起循环计数作用的变量，这个变量的取值一般都包含在执行或终止循环的条件中。 ② 循环结构主要用在一些有规律的重复计算的算法中，例如累加求和、累乘求积等问题。 循环结构 小结顺序、分支和循环三种程序基本控制结构的共同特点： ① 三种结构都是只有一个入口，一个出口。 ② 三种结构内都不存在死循环，即无终止的循环，像下图的结构中就存在一个死循环，在程序中是不允许死循环出现的。 总结 总结 本节课我们学习了三种结构：顺序结构、分支结构和循环结构。 顺序结构：按照由上到下的顺序一行一行地执行的程序结构。 分支结构：根据不同的条件判断来决定程序执行走向的结构。 循环结构：需要重复执行同一操作的程序结构称为循环结构。 我们灵活运用这三种基本结构，就可以编写出各种各样的程序，解决许多实际的问题。 服务理念中的“点点” ◆理解多一点 真情浓一点 ◆学习勤一点 品质高一点 ◆理由少一点 效率高一点 ◆处理问题灵活点 工作过程用心点 ◆对待同事宽容点 互相协作快乐点 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 single a=val(InputBox（输入第一个数a：）) b=val(InputBox（输入第二个数b：）) Print 交换前：a=;a, b=; b c=a a=b b=c MsgBox 交换后a= a b = b ,vbokonly,交换结果 End Sub 顺序结构 在处理实际问题时，只有顺序结构是不够的，经常会遇到一些条件的判断，流程根据条件是否成立有不同的流向。如下图所示，程序根据给定的条件P是否成立而选择执行A操作或B操作 这种先根据