第三课 编写别碰我程序
课 题 教学目标 教 学 内 容 教 教 学 学 方 手 法 段 编写“别碰我”程序 执教： 课型 实践课 认知目标： 1、了解面向对象程序设计的基本思想。 技能目标： 2、掌握用面向对象程序设计的基本思想编写程序。 情感目标： 3、培养学生的编程能力。 教学重点： 理解对象及事件。 教学难点： 巧妙的选择对象与事件。 1．启发式教学法 2．探索学习法 3．多媒体辅助教学 4．任务驱动式教学 教师活动 学生活动 1、 师生共同体验“别碰我”程序的功能，并明确学习任务。 1） 运行“别碰我”程序，如下图所示： 教 学 程 序 设 计 2)当鼠标指针移动到“对象编程”文字后，文字切换显示为“别碰我”。当鼠标指针离开文字“别碰我”后，文字又恢复为“对象编程”。 3）单击文字“别碰我”，窗口左侧出现一个圆。 4）双击文字“别碰我”，画出的圆消失。 5）单击窗体的其它区域，结束程序。 分析程序界面组成，并填写如下表： 对象名 Form1 对象类型 窗体 作用 在上面加载对象组成程序界面 用来显示文字 用来承载鼠标离开Label1对象事件。 Label1 Image1 标签 图象 1、分组讨论、分析任务中所涉及到的对象与事件。 2、将分析结果写入下表： 2、引导学生分析程序界面组成。 3、引导学生分析任务2到5步所涉及到的对象与事件。 4、引导学生输入程序。 对象名 Form1 Label1 Label1 Label1 Image1 事件 Click 事件过程功能 关闭窗口 MouseMove 显示“别碰我” Click DblClick 画圆 清除圆 mousemove 显示“对象编程” 学生进入代码窗口，先选择对象与事件，然后输入对应的程序段。 Private Sub Label1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Label1.Click Me.CreateGraphics().DrawEllipse(Pens.Black, 20, 20, 100, 100) End Sub Private Sub Label1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Label1.DoubleClick Me.CreateGraphics().Clear(Me. BackColor) End Sub Private Sub Label1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Label1.MouseMove Label1.Text = \别碰我\End Sub Private Sub PictureBox1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseMove Label1.Text = \对象编程\End Sub Private Sub Form1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Click End End Sub 5、引导学生保存、调试、运行程序。 保存、调试、运行程序。 1、 对象的三要素是什么？ 2、 除了在属性窗口中直接设置对象的属性外，还可以利用属性赋值语句设置对象的属性。请在“别碰我”程序中找出设置对象属性的具体语句。 3、 “Label1”对象中存放了哪些程序段？这些程序段分别通过什么事件进行激发？ 4、 Form1.Cls中的Cls是“Form1”对象中的一种方法，试分析Cls方法的功能。 反 馈 练 习 设 计 反思
第四课 顺序结构
课 题 教学目标 顺序结构 执教 课型 新授课 认知目标： 了解顺序结构的基本概念； 技能目标： 掌握程序的基本结构 情感目标： 在学习编写VB程序的过程中，建立模块结构化编程思想，养成正确的程序设计习惯。 教学重点： 掌握程序的基本结构 教学难点： 程序的三个组成部分：输入，处理，输出。 教师活动 1、 新课导入 为了保证程序的可读性、可靠性、可维护性，我们必须按一定的规则进行程序设计。 2、三种基本逻辑结构 [提问]：结构化程序设计的三种基本逻辑结构是什么？ 学生活动 阅读课本，并回答问题： 结构化程序设计的三种基本逻辑结构是: 顺序结构； 选择结构； 循环结构。 了解实践任务。 教学重点 3、 顺序结构。 教 从上往下，顺序执行。 学 [实践]：用编程的方法求一元二次方程的程 解。 序 (a≠0) 设 计 当时， 4、 分析任务 1） 输入：一元二次方程的3个系数； 2） 计算：方程的二个解。 3） 输出：方程的二个解。 5、 程序界面分析 分析程序界面，并完成下表 对象名 Form1 Text1 Text2 Text3 Text4 Text5 控件名 作用 窗体 在上面加载对象组成程序界面 文本框 输入系数A 文本框 输入系数B 文本框 输入系数C 文本框 输出解X1 文本框 输出解X2 计算方程的解 结束程序 显示“X +” 显示2 显示X+ 显示=0 显示X1= 显示X2= 6、建立应用程序界面 Command1 按钮 Command2 按钮 Label1 Label2 Label3 Label4 Label5 Label6 标签 标签 标签 标签 标签 标签 1、启动VB； 2、添加对象； 3、修改对象属性； 4、完成下面练习： 通过设置窗体对象的 caption 属性，使得标题栏显示文字“一元二次方程”； 要使得文本框对象中的内容为空，应设置 text 属性； 通过设置命令按钮对象的 caption 属性，使得按钮中显示开始； 通过设置label1对象的 caption 属性，使其显示X +; 要改变对象中的文字大小，可以设置有关对象的 font 属性。 教 7、在两个命令按钮对象中分别输入相应的学 程序段。 程 序 设 计 1、进入代码窗口； 2、输入下面代码： Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click Dim a As Double Dim b As Double
初二信息技术（下）VB程序设计全教案 - 图文
