VB-第5章-选择循环.ppt

第五章 VB的基础结构 世界会向那些有目标和远见的人让路 复习：三种基本结构 本章内容 第一节 选择结构 勇于开始，才能找到成功的路。 主要内容 一、If-else语句 语句形式1：?????????????????????????????? ????? 　If ?表达式 ?Then 　　 语句块1　Else　　语句块2　End If 一、If-else语句 语句形式2：?????????????????????????????? ????? 　If ?表达式 ?Then 　　 语句块1 else 语句块2 一、If-else语句 语句形式1：?????????????????????????????? ????? 　If ?表达式 ?Then 　　 语句块1 end If 一、If-else语句 语句形式2：?????????????????????????????? ????? 　If ?表达式 ?Then 　 语句块1 举例 例：已知两个数x和y，比较它们的大小，并交换，使得 x大于y： 一、If-else语句 语句形式2：?????????????????????????????? ????? 　 If ?表达式1 ?Then 　　　 　语句块1 　ElseIf? 表达式2 ?Then 　　　　语句块2　　　　　 ……　[ Else　语句块 n+1 ] 　 End If 一、If-else语句 语句形式： ???? 　If ?表达式1 ?Then　　　　If? 表达式11 ?Then 　　　　　　　 …… 　　　　 End If 　　　　　　　 …… 　End If 2. Select Case语句（情况语句） 　 　是多分支语句的又一种形式，语句形式： 说明： 1）变量或表达式可以是数值型或字符串表达式 示例源程序 Private Sub Command1_Click() Dim x As Integer x = Val(Text1.Text) Select Case x Case Is 1 Text2.Text = 这是小于1的数 Case 1 To 10 Text2.Text = 这是1到10 之间的数 Case Else Text2.Text = 这是大于10的数 End Select End Sub 第二节 循环结构 世界会向那些有目标和远见的人让路 主要内容 循环语句 循环者：重复执行某些操作也！ 这两种循环的区别：当型循环，条件为真时，执行循环体直到型循环，条件为假时，执行循环 一、Do-Loop循环 形式1： Do While e　　 语句块　　　　 [ Exit? Do ] 语句块　　　　 Loop 语句块 实现从1到10的累加和 Dim i As Integer, sum As Integer i = 1: sum = 0 Do While (i = 10) ‘循环条件是:i=10是执行循环体 sum = sum + i ‘对要求的结果累加运算 i = i + 1 ‘改变循环条件，目的为了跳出循环！ Loop Print sum 一、Do-Loop循环 形式1： Do 　　 语句块　　[ Exit? Do ] 语句块　　　　 Loop While e 语句块 执行次数的比较： Dim i As Integer, sum As Long Do Print i sum = sum + i i = i + 1 Loop While (i = 10) Print sum 一、Do-Loop循环 形式1： Do 　　 语句块　　 [ Exit? Do ] 语句块　　　　 Loop Until e 语句块 例：用do until 实现1到10的累加 形式三 Dim i As Integer, sum As Long Do sum = sum + i i = i + 1