VB第4章选择结构.doc

  1. 1、本文档共17页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
PAGE PAGE 1 教    案 授课时间 3月 17 日 至 3 月 28 日 课时数 4+4 授课方式 理论课? 讨论课□ 习题课□ 实验课□ 上机课? 技能课□ 其他□ 授课单元 第四章 选择结构程序设计 目的 与 要求 1)了解算法的概念和算法的描述 2)掌握选择结构的格式及执行过程 3)正确理解选择结构的嵌套 重点 与 难点 1)各种分支结构语句 2)选择结构的嵌套 主 要 内 容 4.1算法的介绍 *4.2条件语句 *4.3 选择结构的嵌套 教学方法手段(教具) 理论课采用板书与多媒体相结合 实践课采用上机实践操作 参考资料 《Visual Basic程序设计教程》 人民邮电出版社 《 Visual Basic程序设计实验教程》 人民邮电出版社 思考题、 作业 习题一 1 -4 习题一 5 -10 1-实验2 讲    稿 第四章 选择结构程序设计 [旧课复习]: 复习内容: 1.已学过的几个常用的控件 2.控件中输入输出语句的使用 复习目的:让学生掌握基本控件的使用 复习时长:大约10分钟 [新课导入]: 导入方式:以日常生活中的实例让学生理解什么是选择结构 导入目的:增强学生的理解能力 导入时长:大约5分钟 [新课讲授]: 重点:各种分支结构语句的使用 难点:选择结构的嵌套 方法:运用多媒体辅助教学,采用讲授法和案例教学法 4.1算法介绍 4.1.1算法介绍 一、算法概述 所谓算法,是对特定问题求解步骤的一种描述,它是指令的有限序列,其中每个指令表示一个或多个操作。 算法有以下特征: 有穷性 确定性 可行性 输入 输出 4.1.2算法的表示 常用的表示算法的方法有:自然语言、伪代码、流程图,本章重点介绍用流程图表示算法。 流程图用一些图框、流程线以及文字说明来表示算法。用图来表示算法,直观、形象、容易理解。 包括:传统流程图、结构化流程图。 因传统流程图中流程线的使用无限制可能导致流程图毫无规律。结构化流程图使用3中基本结构,即:顺序结构、选择结构和循环结构(如图4-1所示),从而大大提高流程图的规律性。 图4-1(a) 顺序结构流程图 图4-1(b) 选择结构流程图 图4-1(c) 循环结构流程图 4.2条件语句 VB中选择结构通过条件语句来完成,包括:单分支、双分支和多分支等。 4.2.1单分支结构语句 单分支结构语句包括单行结构和块结构。 1.“单行结构”格式为: If 条件表达式 Then 语句序列 2. “块结构”格式为: If 条件表达式 Then 语句序列 说明: (1)“条件表达式”可以是关系表达式、布尔表达式或者数值表达式。如果是数值表达式,则非0值为真,0为假。 (2)当条件表达式的值为真时执行语句序列。 【例4-1】已知两个数x和y,比较它们的大小,使得xy。 分析:对任意的两个数x、y,其中x若为大的数,直接输出即可,若 y为大的数,则交换两数即可。 其语句描述如下: 用单行语句实现: If xy then t=x:x=y:y=t 用块语句实现: If xy then t=x x=y y=t 4.2.2双分支结构语句 双分支结构语句也包括单行结构和块结构。 1.“单行结构”格式为: If 条件表达式 Then语句序列1[ Else语句序列2] 2. “块结构”格式为: If 条件表达式 Then 语句序列1 [Else 语句序列2] End If 说明: (1)“条件表达式”可以是关系表达式、布尔表达式或者数值表达式。如果是数值表达式,则非0值为真,0为假。 (2)当条件表达式的值为真时执行语句列1, 否则执行语句列2。 【例4-2】输入一个整数x,判断该数的奇偶性。 分析:该数能被2整除时是偶数,否则是奇数。能被2整除要作为判断的条件,当能被2整除时输出偶数,否则输出奇数。 图4-2 判断数据奇偶性设计步骤如下。 图4-2 判断数据奇偶性 (1)建立应用程序用户界面,如图4-2所示。 (2)编写代码。 编写命令按钮Command1的Click事件代码: Private Sub Command1_Click() Dim x As Integer, y As String x = Val(Text1.Text) If x Mod 2 = 0 Then y = x 是偶数 Else

文档评论(0)

151****0104 + 关注
实名认证
内容提供者

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

1亿VIP精品文档

相关文档