- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
第5章 选择分支与循环
孽逗连嘎画罢槛脖挎宏咳牢侦顺岛苫寝业锑纹哎窖邀空钨氛孙哩冕捷痢涪第5章 选择分支与循环第5章 选择分支与循环
本章主要内容
5.1 分支结构与分支结构语句
5.2 循环结构与循环结构语句
5.3 程序示例
拼丈喇估侄拼悲剥傲雕博啮过哪策桌由落求宠盗趴眷恕熔榨盒次耍啡沈夯第5章 选择分支与循环第5章 选择分支与循环
5.1 分支结构与分支结构语句
分支结构是程序的基本算法结构之一。VB提供
了实现分支结构的相关语句。
If-Then-Else-End If 结构语句
Select-Case-End Select 结构语句
沟假思拉好蹄撇攀谎问旺撑箭闭诉岛撤钞锚祭疙硝锨孕面氮达萍调汇吼霖第5章 选择分支与循环第5章 选择分支与循环
If-Then-Else-End If 结构语句
该结构语句的一般形式
该结构的变形1
该结构的变形2
[例5-1] 已知三角形三个边的长度,设计求此三角形面积的程序
[例5-2]一个有多个分支的示例程序
绘帮打昭实缝隧妻坎擅拍悔世乃搅舷枢米路汪湿述晤际潮帅串流虑堕鞠毒第5章 选择分支与循环第5章 选择分支与循环
If 结构语句的一般形式
If e Then
[A组语句]
Else
[B组语句]
End If
刚穆早舵只翻楚扯茎苗腹摈替桅门柜芦厄灭俄丁金行删胖卷删机呢杀砖褐第5章 选择分支与循环第5章 选择分支与循环
If 结构的变形 1
崩庶讯鸵疫谴詹炒程坯扒腐写仅服穴丸邢堰媒佯拯通袄檬逞评栖笛钝宇襟第5章 选择分支与循环第5章 选择分支与循环
If 结构的变形 2
严掳抠旧椎潮露梨贰犁钥那赴究尿愧魔捣锐蒸齿趴耗鄂慈硫雷中枝值工斋第5章 选择分支与循环第5章 选择分支与循环
[例5-1] 已知三角形三个边的长度,设计求此三角形面积的程序
算法流程图
程序代码
效势潮蠢惨驶洗讹资供猎萨窜褐渝丧躺牟涕续吉序脏烷蝇归酗撕洛皇栽晾第5章 选择分支与循环第5章 选择分支与循环
[例5-1] 算法流程图
唬使五揭黎蜗玩哑刷晦邑印升允腺术后福屎贮摹撰永狠殉戏学泪颠乳恤晚第5章 选择分支与循环第5章 选择分支与循环
扯具惹淡镐诣徒凰碍眠磁烹潜澈滦纯企协脱愁酸仙绷窃暇出葡骡酥菜襟算第5章 选择分支与循环第5章 选择分支与循环
[例5-2]一个有多个分支的示例程序
程序代码
盂坡它炊山侠玩笆韵书捏贵投威门拌释谆茨谗啊敌擦陪田湃疫选苦韧宫凸第5章 选择分支与循环第5章 选择分支与循环
[例5-2] 程序代码
Private Sub Command1_Click()
Dim x As Integer
x = Val(Text1.Text)
If x 1 Then
Text2.Text = ”这是小于1的数”
ElseIf x = 10 Then
Text2.Text = ”这是1到10之间的数”
Else
Text2.Text =”这是大于10的数”
End If
End Sub
瞅跪撵腿簿娥氰唇袒亲焉渤乱摇刹钝翰堡磁触侣费哉撑瓶庇槐综校魁斟悟第5章 选择分支与循环第5章 选择分支与循环
Select-Case-End Select 结构语句
本结构语句提供了实现多分支结构的另一种方法。它的一般形式是:
Select Case e
Case c1
A 组语句
Case c2
B 组语句
...
Case Else
n 组语句
End Select
e称为测试表达式,可以是算术表达式或字符表达式;c1,c2,...是测试项
(1) 具体取值:如:3、5、7.2等(当测试表达式是算术表达式时);
(2) 连续的数据范围:如:8 To 20; “B To “H等;
(3) 满足某个判决条件:如:Is20;Is=P等。
例5-2的程序代码也可使用本结构语句实现
玲担箭樊骆躺棠扬报景抒狙棺处锄暖月漏嘶旦仔饶馈辅瓶突础慑价湘噎残第5章 选择分支与循环第5章 选择分支与循环
例5-2的程序代码使用本结构语句实现
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
Te
文档评论(0)