第7章VisualBasic控制结构.pptVIP

Visual Basic语言程序设计 第7章 Visual Basic控制结构 7.1 选择控制结构 给定条件进行分析、比较和判断，并根据判断结果采取不同的操作，在VB中，这样的问题通过选择结构程序来解决。选择结构通过条件语句来实现。条件语句也称If语句，它有两种格式，一种是单行结构，一种是块结构。 7.1.1 单行结构条件语句 单行条件语句比较简单，其格式如下： If 条件 Then then部分［Else else部分］ 该语句的功能是：如果“条件”为True，则执行“then部分”，否则执行“else部分”。 其中 Else部分是可选的，当省略时，简化为： If 条件Then then部分 它的功能是：如果“条件”为True，则执行“then部分”，否则执行下一行程序。 7.1.1 单行结构条件语句 例： 设有如下函数： 输入x值，求y值。 Private Sub Form_Click() Dim x As Single, y As Single x=InputBox(请输入x的值) If x0 Then y=1 ElseIf x=0 Then y=0 Else y=-1 Print x=; x, y=; y End Sub 7.1.2 块结构条件语句 块结构条件语句一般格式如下： If 条件1 Then 语句块1 ［ElseIf 条件2 Then 语句块2］ ［ElseIf 条件3 Then 语句块3］ …… ［Else 语句块n］ End If 7.1.2 块结构条件语句 例如： Check＄=InputBox＄(Enter a string: ,Check Box) If Len(Check＄)6 Then Print Input too long ElseIf Len(Check＄)6 Then Print Input too short ElseIf Left＄(Check＄)=a Then Print Can’t start with an a End If 7.1.2 块结构条件语句 注意：当有多个条件时，单行语句和多行块结构的区别。 7.1.3 IIf函数 IIf函数可用来执行简单的条件判断操作，它是“If…Then…Else”结构的简写版本。 格式如下： result=IIf(条件, True部分, False部分) “result”是函数的返回值 “条件”是一个逻辑表达式。当“条件”为真时，IIf函数返回“True部分”，而当“条件”为假时返回“False部分”。 “True部分”或“False部分”可以是表达式、变量或其他函数。 7.1.3 IIf函数 例如，块结构： if a5 Then r=1 Else r=2 End If 可用下面的IIf函数来代替： r=IIf(a5, 1, 2) 7.2 多分支控制结构 在Visual Basic中，多分支结构程序通过情况语句来实现。情况语句也称Select Case语句或Case语句，它根据一个表达式的值，在一组相互独立的可选语句序列中挑选要执行的语句序列。 7.2 多分支控制结构 格式： Select Case 测试表达式 Case 表达式表列1 语句块1 ［Case 表达式表列2 ［语句块2］］ …… ［Case Else ［语句块n］］ End Select 7.2 多分支控制结构 格式： Select Case 测试表达式 Case 表达式表列1 语句块1 ［Case 表达式表列2 ［语句块2］］ …… ［Case Else ［语句块n］］ End Select 7.2 多分支控制结构 例： Sub Form_Click() msg=Enter data var=InputBox(msg) Select Case var Case 1 Text1.Text=1 Case 2 Text1.Text=2 Case 3 Text1.Text=3 Case Else Text1.Text=Good bye End Select End Sub 7.3 For循环控制结构 在实际应用中，经常遇到一些操作并不复杂，但需要反复多次处理的问题。对于这类问题，如果用顺序结构的程序来处理，将是十分繁琐的，有时候可能是难以实现的。为此，Visual Basic提供了循环语句。使用循环语句，可以实现循环结构程序设计。循环语句产生一个重复执行的语句序列，直到指定的条件满足为止。 7.3 For循环控制结构 Vi