3-1分支结构__VB程序设计_课件.pptVIP

  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文档。上传文档
查看更多
习题 1、语句 If 表达式 then中的表达式可以是算术、字符、关系、逻辑表达式中的哪些? 2、指出下列语句中的错误 1 If x≥y Then print x 2 If 10<x<20 Then x x+20 3、当C字符变量中的第三个字符是“C”时,利用MsgBox显示“Yes”,否则显示“No” 习题 1、 下面程序段求两个数中的大数,____不正确。 Max IIf x y ,x ,y If x y Then Max x Else Max y Max x : If y x Then Max y If y x Then Max y Max x 2、下面语句执行后,变量W中的值是____。 W Choose WeekDay #3/22/2010# ,”red”, _ ”green”,”Blue”,”yellow” (A)”red” (B)”green” (C)”blue” (D)”yellow” 作业1 实验5-1 实验5-3 测试2 作业 编写一段程序,要求实现功能:判别用户输入的年份是否为闰年,并显示相关信息。判断闰年的条件是:年份能被4整除但不能被100整除,或则能被400整除 1、提示用户输入年份 InputBox函数 2、判别输入的是四位年份数据,否则提示“数据输入错误,请输入四位年份数据” 3、判断完毕,显示相应的通知信息 * 第三章 Visual Basic结构语句 3.1 算 法 3.2 选 择 结 构 3.3 循 环 结 构 3.4 其他控制语句 3.5 程 序 示 例 IF条件语句 方式1: If Then 语句块 End If 方式2: If Then If…Then语句 单分支结构 单分支结构流程图 表达式 语句块 T F 表达式:一般为关系表达式、逻辑表达式,也可为算术表达式。表达式按非零为True,零为False来判断。 语句块:可以是一句或多句语句。若为方式2,则只能是一句语句或由冒号分隔的在一行书写的多句语句。 表达式 语句块 T F X 2:y 3 2 3? 条件不成立 例:已知两个数x和y,比较它们的大小, 使得x大于y。 情况1: x y 如果x 2:y 3 例:已知两个数x和y,比较它们的大小, 使得x大于y。 If x y Then t x x y y t End If Y X T ① ② ③ If x y Then t x: x y: y t 或者 重要的是学会两个数的交换,若上页语句次序变一下,结果如何? 下面三种方法哪种正确 方法一 X T T Y Y T 方法二 T Y Y X X T 方法三 X Y T Y X T Y X T ① ② ③ If…Then…Else语句 双分支结构 方法一: If Then Else End If 方法二: If Then Else 双分支结构流程图 表达式 语句块2 T F 语句块1 例:计算分段函数 用双分支结构实现: If x 0 Then y sin x +sqr x*x+1 Else y cos x -x^3+3*x End If 思考:能否用单分支结构实现 思考:下列语句能否实现 If x 0 Then y cos x -x^3+3*x y sin x +sqr x*x+1 用单分支结构实现: y cos x -x^3+3*x If x 0 Then y sin x +sqr x*x+1 或: If x=0 Then y cos x -x^3+3*x If x 0 Then y sin x +sqr x*x+1 If x y If 10 x And x 20 If Mid c,3,1 “C” Then MsgBox “Yes” Else MsgBox “No” 习题 4、下面程序段运行后,显示的结果是: Dim x If x Then Print x Else Print x+1 1 B 0 C –1 D 显示出错信息 5、作业本 P24 3 6、作业本 P30

文档评论(0)

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

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

1亿VIP精品文档

相关文档