第5章-VB控制结构.ppt

文档介绍：第5章 Visual Basic控制结构
算法及其描述
选择结构
循环结构
常用算法
算法及其描述

— 是解决问题的有序步骤。

(1套是指If或Else后面的语句块中又包含If语句。
形式如下：
If <表达式1> Then
If <表达式11> Then
…
End If
…
End If
(补) 已知x，y，z三个数,使得x>y>z，用一个IF语句和一个嵌套的IF语句实现
If x<y Then t=x: x=y: y=t
If y<z Then
t=y: y=z: z=t
If x<y Then
t=x: x=y: y=t
End If
End If
If语句的嵌套注意事项：书写锯齿型； If 与End If配对。
<表达式列表>：与<变量或表达式>同类型的下面四种形式之一：
表达式 例: "A"
一组枚举表达式(用逗号分隔) 2,4,6,8
表达式1 To 表达式2 60 To 100
Is 关系运算符表达式 Is < 60
5. Select Case语句(情况语句)
形式：
Select Case 变量或表达式
Case 表达式列表1
语句块1
Case 表达式列表2
语句块2
…
[Case Else
语句块n+1]
End Select
数值型或字符串表达式
(补) 变量strC中存放了一个字符，判断该字符类型。
用多分支结构实现：
If Ucase(strC) >="A" And Ucase (strC) <="Z" Then Print strC + "是字母字符"
ElseIf strC >="0" And strC <="9" Then
Print strC + "是数字字符"
Else
Print strC + "其他字符"
End If
用Select Case语句实现:
Select Case strC
Case "a" To "z"，"A" To "Z"
Print strC + "是字母字符"
Case "0" To "9"
Print strC + "是数字字符"
Case Else
Print strC + “是其它字符"
End Select
(补) 已知坐标点(x，y)，判断其落在哪个象限。
哪个能实现，哪个不能实现？
方法一
If x > 0 And y >0 Then
Print "在第一象限"
ElseIf x < 0 And y > 0 Then
Print "在第二象限"
ElseIf x < 0 And y < 0 Then
Print "在第三象限"
ElseIf x > 0 And y <0 Then
Print "在第四象限"
End If
方法二
Select Case x,y
Case x > 0 And y > 0
Print "在第一象限"
Case x < 0 And y > 0
Print "在第二象限"
Case x < 0 And y < 0
Print "在第三象限"
Case x > 0 And y <0
Print "在第四象限"
End Select
方法二代码错误：
1. Select Case 后不能出现多个变量；
2. Case后不能出现变量及有关运算符。
商店售货，按购买货物的多少分别给予不同优惠折扣如下:编程计算购物款数。购物不足250元，无折扣，购物满250元、不足500元，减价5%，计算机根据学生的答案判断正确与