条件语句嵌套在程序设计中应用与实例分析.pdfVIP

条件语句嵌套在程序设计中应用与实例分析.pdf

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多

条件语句的嵌套

学习内容

各种条件语句的嵌套使用的规则和方法;

嵌套是计算机程序语言中常见的结构,它指将程序设计语言中的选择

结构或者循环结构再套用一种结构。这里所讨论的内容就是条件语句的

嵌套。

我们生活中常常能遇到一些条件语句的嵌套。例如:我们在购物的过

程中常常遇到一种情况买某些东西打八折,如果买得多还可以再打九折等。

这就用到了条件语句的嵌套,我们对上述情况进行分析。首先我们要求判断买

哪些东西才能打八折,然后如果买了能打折的东西再判断买东西的多少是否能够

再打折。具体描述如下:

IF能打八折Then

IF买得多Then

再打9折

Else

打8折

EndIf

Else

不打折

EndIf

条件语句的嵌套

当我们的程序中遇到有多个条件,并且多个条件之间有相互依赖的关系

的话,我们可以考虑使用条件语句的嵌套来实现

例1:某一个旅游团为了扩大业务,招揽顾客,推出了打折活动:凡

3、4、5、6月份顾客一律打七折;凡7、8月份打八折;凡9~12月份打

九折,其他月份不打折。同时还提出,如果9~12月期间报团

人数超过10人的话再打九折。请设计出程序,输入月份、人数,计算出总

共打多少折。界面设计参考下面窗体。

这个题目有两种选择,一种是根据月份打折,另一种是根据人数的

多少打折。这里就用到了条件判断语句的嵌套。同时可以看出需要首先要判

断出月份才能继续判断人数,所以判断月份的条件在外层,判断人数的条件

在。外层为多重循环,内层为双向选择条件。具体程序如下(命令按钮

代码):

PrivateSubCommand1_Click()

DimaAsInteger,bAsInteger

DimxAsSingle

a=Val(Text1.Text)‘本框内容赋值给变量并转化为数值型

bVal(Text2.Text)

SelectCasea‘判断旅行的月份

Case3To6‘如果是3,4,5,6月

x0.7

Case7,8‘如果是7、8月

x0.8

Case9To12

Ifb10Then‘判断购票的数量是否大于10张

x=0.9*0.9‘再打九折

Else

x=0.9

EndIf

CaseElse

x=1

EndSelect

MsgBox共打折x‘输出折扣数

EndSub

知识点解析

1、1、条件语句的嵌套关键分析清楚外层条件和内层条件,区分主要的依据

一方面看两个条件之间是否存在先后次序,例如上题;另一方面看条件的复杂程度,较复

杂的条件放置在外层,简单的放置在内层。

2、2、有些条件不存在外层和内层条件的区别,则不需要分内外层。

3、3、条件语句的嵌套有时可以用同时判断多个条件来代替。

课堂练习

使用文本框输入三条线段的长度,求这3条线所构成的三角形面积。

提示:应先判断3条线段是否能组成三角形,所以首先判断两个条件(1)3条线段均

大于0;(2)任意两边之和大于第三条边。如果条件都满足那么就使用海式计算面积

Ms*(s−a)(s−b)(s−c)其中s(a+b+c)2。程序代码如下:

Dima,b,c,s,mAsSingle

aVal(Text1.Text):bVal(Text2.Text):cVal(Text3.Text)

Ifa0Andb0Andc0Then‘判断三边大于0

‘判断两边之和大于第三边

文档评论(0)

lflebooks + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档