原创力文档- 1、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。。
- 2、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
- 4、该文档为VIP文档，如果想要下载，成为VIP会员后，下载免费。
- 5、成为VIP后，下载本文档将扣除1次下载权益。下载后，不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后，您将拥有八大权益，权益包括：VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传，每下载1次， 网站将根据用户上传文档的质量评分、类型等，对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
vb 节约用水算水价 课件
If you are a boy, then put up your left hand, else put up your right hand. If you are a girl, then put up your left hand, else put up your right hand. 条件语句 If 条件P Then 语句组Ａ [Else 语句组Ｂ] End If 下面语句是什么意思？ Dim x,y as integer X=20 If x=11 then y=x+6 Else y=x+2 End If 使用IF语句解决下列问题 某城市对居民生活用水实行阶梯式水价，若用水量小于或等于12吨，价格为2.85元/吨；若用水量大于12吨，大于12吨的部分，价格为：2.85×2元/吨。 请同学们计算出某户居民的水价。 Dim x, y As Single x = Val(Text1.Text) If x = 12 Then y = 2.85 * x Else y = 2.85 * 12 + 2.85 * 2 * (x-12) End If Text2.Text = CStr(y) * * 条件P 语句Ａ 语句Ｂ 条件不成立 条件成立 说明： （1）If语句必须以一个End If结束. （2）程序运行该语句时，首先判断条件P: 如果条件P为True，执行Then后的语句组A，否则执行Else后的语句组B。当执行完Then或Else之后的语句组后，则继续执行End If后的语句。 （3）语句组可以是单个语句，也可以是多个语句。 （4）Else子句是可选项。若有该项，Else必须单独占一行。 X=10 赋值语句：变量名=要赋的值 X=10 表示把10赋值给x 定义变量：dim 变量 as 数据类型 说明：对变量一般要先定义再使用，定义时要说明变量的名称和数据类型。 开始 X=11 ? X=10 输出y值 结束 否 是 y=x+2 Y=x+6 开始 y=2.85×x X=12 ? 输入x 输出y 结束 y=12×2.85+(x-12)×2.85×2 否 是 说明：x为用水吨数 y为水费 比较运算符：、=、、=、、= 算术运算符：“+”、“-”、“*”、“/ ” *
文档评论（0）