第7章 基本控制结构.pptVIP

顺序结构 7.1 If选择结构 7.2 多分支选择结构 7.3 For循环结构 7.4 While循环结构 7.5 Do循环结构 7.6 多重循环 注意：1) 条件是用关系表达式或逻辑表达式来描述的，其结果是真（T）或假（F）。 2)条件语句可以嵌套,Else和它最近的if配对.简化：If 条件 Then 语句1试区别下面两段代码的区别： X=4:Y=3 If X＞Y Then X=X*X Y=Y*Y  If X＞Y Then X=X*X Else Y=Y*Y 例1：已知两个数x和y，比较它们的大小，使得x大于y。 简单 格式：If 条件1 Then 语句块1 [ Else 语句块2 ] End If……… 二、块结构条件句 执行过程 格式： IIf（条件表达式，值1，值2）功能：根据条件表达式成立与否，来决定其值。 条件表达式为真 值1 条件表达式为假 值2使用格式：变量 = Iif ( 条件 , 值1 , 值2 )  例如，求x,y,z中大的数，放入max变量中，语句如下： max = IIf（ x y，x，y） max = Iif ( maxz , max, z )  三、 Iif函数 （1）计算测试表达式的值（2）将测试表达式的值与Case语句中的表达式列表中的每一个值逐一进行比较。 （3）如果与其中的一个值相匹配，则执行该Case语句中的语句块，然后，转移到End Select的下一语句执行。  （4）如果在表达式列表中没有一个值与测试表达式相匹配，则 Visual Basic 执行 Case Else 子句（此项是可选的）中的语句。再转移到End Select的下一个语句执行。注意：如果不止一个 Case与测试表达式相匹配，则只对第一个匹配的 Case 执行与之相关联的语句块。 Select Case选择结构执行的过程为： 格式为： While 条件 [语句块] 修改循环条件 Wend While循环先对条件进行测试，条件成立便执行， 如果条件总是成立，则程序一直循环下去，出现死循环 While循环可以嵌套,每个必须有Wend 7.4 While… Wend循环控制结构 例：求 1~100的和 Private Sub Command1_Click( ) Dim x As Integer, sum As Integer x = 1: sum = 0 While x = 100 sum = sum + x x = x + 1 Wend Print sum=; sum End Sub 7.4 While… Wend循环控制结构 Do...Loop循环的格式如下： 1) Do [While|Until 循环条件] [语句块] [Exit DO] 修改循环条件 Loop 2) Do [语句块] [Exit Do] 修改循环条件 Loop [While|Until 循环条件] 当型循环：先判断，后执行 条件为假时，当型循环一次也不执行 条件为假时，直到型循环要执行一次 直到型循环：先执行， 后判断 7.5 Do… Loop循环控制结构 7 Visual Basic控制结构 顺序结构 VB的三种基本结构：顺序、选择和循环 7 Visual Basic控制结构 a1 = Val(InputBox(请输入第1个数, , 1)) a2 = Val(InputBox(请输入第2个数, , 2)) a3 = Val(InputBox(请输入第3个数, , 3)) a4 = Val(InputBox(请输入第4个数, , 4)) sum = a1 + a2 + a3 + a4 avg = sum / 4 Print 输入的数分别为 ：; a1, a2, a3, a4 Print 和为 ：; sum Print 平均值为 ：; avg 输入 计算 输出 一、单行结