第三节 选择结构的嵌套 课件

课件10张PPT。第三节选择结构的嵌套 复习：块 If 语句格式： If 条件 Then 语句块1 [else 语句块2] End If69IF语句的嵌套所谓嵌套的选择结构就是一个选择结构又包含另一个或多个选择结构。在一个If语句中可以包含另一个If语句。嵌套语句的优缺点Select Case语句（情况语句） 形式： Select Case 变量或表达式 Case 表达式列表1 语句块1 Case 表达式列表2 语句块2 … [Case Else 语句块n+1] End Select <表达式列表>：与<变量或表达式>同类型的下面四种形式之一： 表达式 A +5 一组枚举表达式(用逗号分隔) 2, 4, 6, 8 表达式1 To 表达式2 60 to 100 Is 关系运算符表达式 Is < 60数值型或字符串表达式 问题：书城的促销活动方案如下： 购书未满200元，赠送5元购书券； 购书满200元但未满500元，赠送购书券金额为消费金额的5%； 购书满500元但没满1000元，赠送购书券金额的10%； 购书满1000元，赠送购书券金额为消费金额的15%。购书券最小面值1元。1.分析问题Private Sub Command1_Click() Dim m As Integer, p As Integer m = Val(Text1.Text) select case m case is<200 p = 5 case is < 500 p = m * 0.05 case is < 1000 Then p = m * 0.1 case else p = m * 0.15 End select Text2.Text = p End Sub练一练