计算机基础概论与VB程序设计第三章 A. 结构化程序设计.pptxVIP

第三章 结构化程序设计与数组;本章重点： 掌握IF选择结构，select case结构 掌握循环结构 掌握数组的定义及使用。 本章难点： 循环结构 数组的使用;3.1 三种基本的控制结构;顺序结构;3.2 选择结构（P58）;3.2 选择结构;3.2 选择结构;If xy then max=x else max=y End if ; 问题：用IF Else结构实现;对第二种格式进行变化，延伸为多分支结构;;12;控件默认名称 “Name”属性;14;选择结构的嵌套;例3-3：判断一元二次方程ax2+bx+c=0根的方式的程序;3、语法格式3——情况选择语句 Select case 测试表达式 case 表达式列表1 [语句块1] case 表达式列表2 [语句块2] ……………. [case else [语句块n+1] ] End select;（1）Select Case、Case语句、End Select均须独立一行；（2）Case语句类似于ElseIf；（3）Case语句中禁止出现逻辑运算符；（4）Case语句涉及关系运算，则须用is指代测试表达式的值。 例：用Select Case语句求学生的成绩等级 Test_select1 Test_select2;例3-6 输入年月，输出该月的天数，注意需要考虑闰年 闰年的判断？ (Y mod 4=0 and y mod 1000) or y mod 400=0; n% = val(text1.text) If n Mod 2 = 0 Then Print n / 2 ElseIf n Mod 3 = 0 Then Print n / 3 ElseIf n / 5 = 0 Then Print n / 5 Else Print n End If 文本框中输入：15 结果： ;Private Sub Form_Click() Dim strC As String * 1 strC = InputBox(请输入数据) Select Case strC Case a To z, A To Z Form1.Print strC + Is Alpha Character Case 0 To 9 Form1.Print strC + Is Numeral Character Case Else Form1.Print strC + Is Other Character End Select End Sub 设输入的数据分别为“W”，“8”和“？”时，单击窗体后，窗体上显示的内容分别是什么？;3.3 循环结构（P63）;用循环语句解决上面的问题，程序非常简短：求解:1～100之间所有整数的和。; 通过上面的对比可知，循环结构非常适合于解决处理过程相同、处理数据相关，但处理的具体值不同的问题。我们把能够处理这类问题的语句称为循环语句。 VB提供了三种不同风格的循环语句，它们分别是： （1）For…Next语句； （2）While…Wend语句。 （3）Do…Loop语句； 我们将对这3种循环语句逐一介绍。;解决循环问题的方法;For 控制变量＝初值 to 终值 [Step 步长] 循环体 Next [控制变量];给控制变量 i 赋初值;4、可使用Exit For语句强制退出，跳到Next的下一条语句继续执行。;循环次数;判断下面几个循环语句分别循环了多少次。;例3-9 找出一个在1~1000中被7除余5、被5除余3、被3除余2的数（Exit for）;被7除余5：5，5+7，(5+7)+7，(5+7+7)+7，…… For i =5 To 1000 Step 7 If i Mod 5 = 3 And i Mod 3 = 2 Then Exit For ‘返 回满足的第一个数 Next i;思考题：请书写下列程序运行的结果;3.3.2 While…Wend语句（用于控制循环次数未知） 格式如下： While 条件 循环体 Wend 功能：当条件为真时执行循环体， 否则跳到Wend的下一跳语句继续执行。;求解“累加和”类题目的基本思路;3.3.3 Do/Loop语句（用于控制循环次数未知）;F;形式3： Do Until 条件 语句块