1 / 53
文档名称:

第5章-VB控制结构.ppt

格式:ppt   大小:387KB   页数:53页
下载后只包含 1 个 PPT 格式的文档,没有任何的图纸或源代码,查看文件列表

如果您已付费下载过本站文档,您可以点这里二次下载

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



5.1 算法及其描述
1.算法的概念
— 是解决问题的有序步骤。
2.算法的特征
(1套是指If或Else后面的语句块中又包含If语句。
形式如下:
If <表达式1> Then
If <表达式11> Then

End If

End If
例5.3(补) 已知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
数值型或字符串表达式


例5.4(补) 变量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


例5.5(补) 已知坐标点(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后不能出现变量及有关运算符。


例5.6 商店售货,按购买货物的多少分别给予不同优惠折扣如下:编程计算购物款数。购物不足250元,无折扣,购物满250元、不足500元,减价5%,计算机根据学生的答案判断正确与

分享好友

预览全文

第5章-VB控制结构.ppt

上传人:陈潇睡不醒 8/4/2022 文件大小:387 KB

下载得到文件列表

第5章-VB控制结构.ppt

相关文档