[工学]第3章 结构化程序设计与数组.ppt

第三章 结构化程序设计与数组 3.1 结构程序设计的三种基本结构 3.2 选择结构 3.3 循环结构 3.4 多重循环 3.5 数组及应用 3.6 实例 3.2 选择结构 选择结构的特点是：根据所给定的条件成立与否，来决定从各种实际可能的不同分支中选择执行某一分支的相应操作。在VB中提供的用来实现选择结构的语句主要有If和Select。 3.2.1 IF结构 If基本结构 If 条件 then 语句块 Else 语句块 End If 例3-1 分段计算表达式值 If x = 5 Then Text1.Text = 1 - x * x Else Text1.Text = (x - 5) ^ 0.25 End If If x = 5 Then Text1=1 - x * x Else Text1=(x - 5) ^ 0.25 例3＿2　当XY时，交换两个变量 If x y Then 　temp = x 　 x = y 　 y = temp End if If x y Then temp = x: x = y: y = temp 例3＿3　求方程的根(P54) (判断b2-4ac是否大于0) 例3－4　单击窗体以改变显示的内容(P55) （要设置一个模块级变量，保存点击的次数） 条件函数Iif函数 函数格式：IIf（逻辑表达式,X1,X2)当表达式为True时返回X1当表达式为False时返回X2 例:求x,y中大的数，放入Tmax变量中，语句为：Tmax=Iif(xy,x,y) 3.2.2 Select Case语句(情况语句) 格式： Select Case 表达式 Case 表达式列表1 语句块1 Case 表达式列表2 语句块2 … [Case Else 语句块n+1] End Select 表达式列表格式 表达式是同类型的下面3种形式及其列表组合： 表达式，例: A 两表达式之间，例：60 To 100 大于或小于某值，用Is关键词（输入时Is可省略，系统会自动添加），例：Is 60 例3-5 输入x、n，进行多分支计算(P57)。 例3＿6　输入年、月份，输入出该月天数 错误处理语句 On Error GoTo语句 程序在运行时，若产生运行错误，将终止执行。对于可以预见的错误，可以用On Error Goto语句捕获，并将控制转去执行一段预先写好的处理错误的语句。 格式： On Error Goto L1 On Error Resume Next 功能：在执行该语句后，若发生运行错误，控制将转去执行标号为L1的语句。 For-Next循环的执行过程 （1）把初值e1赋给循环变量X，记下终值与步长值 （2）将X的值与循环终值e2比较。如果X越过终值，则跳过（3）——（5）步骤而直接执行第（6）步骤；否则接着执行下面（3）——（5）步骤。 （3）执行循环体中各语句 （4）遇NEXT语句，循环变量X按指定步长增值，此时控制变量X已经由一个新值代替了原来的值 （5）返回步骤（2） （6）循环执行终止，接着执行NEXT语句的下一个语句 For/Next结构的其它情况 （1）步长缺省值为1。当步长值为零时，循环永不终止。 （2） 循环变量取值不合理，则不执行循环体。如下列循环一次也不执行： For n = 99 to 1 step 2 （3）循环变量的主要作用是用来对循环进行控制，决定当时是否应终止循环过程。在循环体内一般不要对循环变量再赋值，否则将影响原有的循环控制状况。 （4） 循环体中可以出现语句“Exit For”，用于将控制转移到Next后一语句。 （5） 循环正常结束（未执行Exit For等控制语句）后，控制变量为最后1次取值加步长。 （6）循环语句中间可以不含循环体。 循环示例 求1+2+3+……+10的和 求12+22+32+……+102的和 求1×2+2×3……+9×10的积 例3-8 求表达式的值。 例3-9 找出1个在1至1000中被7除余5、被5除余3、被3除余2的数（用Exit For）。 例3-10 输入n个数，输出其中的最大值。 知识点：如何求最大值、最小值 2.5.2 While/Wend 语句 格式：While 条件 循环体 Wend 功能：当条件为真（True）时执行循环体。 While/Wend结构的特点是：先判断条件、后执行循环体，常用于编制某些循环次数预先未知的程序。 While/Wend语句完全可以用Do While-Loop语句代替。 例3