一、兴趣导入，揭示主题

【教师演示】大家看这样一个小程序，这是用VB程序编写的加法运算器。我们运行程序给大家演示该程序的功能。

【提出问题】当我在文本框内写上一个结果，单击“确定”按钮时，程序是怎样判断我输入的结果正确与否的？这就是我们这一节课的所要讲的“VB的事件驱动”。

利用演示有趣的程序来激发学生兴趣，便于导入正题

二、引导启发，新课教学

1、基础知识

【教师讲解】当对“确定”按钮实施单击操作时，按钮就响应了一个click事件，就会产生响应的结果，事件响应的过程用程序来描述为：

Private Sub command1_click()

……（响应事件的结果）

End Sub

【提出新问题】如何描述响应事件的结果？这个问题比较复杂，今天我们学习简单一点的怎么在程序中来描述对象属性的改变？

【教师讲解】对象.属性=属性值。其含义是通过赋值语句来改变对象的属性。

【举例】

例1：Command1.Caption=”确定”

意思是使按钮上的显示文字为确定

例2：Form1.BackColor=VBRed

意思是使窗体的背景色变为红色

【教师提问】如何使文本框内显示为“信息技术教育”？

【学生回答】Text1.Text=”信息技术教育”

【教师演示】进入VB环境查看程序代码，运行程序。

2、问题深入

【给出问题】编程使得程序在运行时单击隐藏按钮标签隐藏起来？

【进入VB环境】演示程序的要求

【引导学生分析】我们从三个方面来进行分析：①触发的事件——对鼠标进行了单击操作，因此就产生了Click事件；②响应事件的对象——按钮；③响应事件的结果——当对按钮进行了单击操作之后标签隐藏。三个方面分析清楚了，这个问题也就很容易解决了。

【进入VB环境】演示操作步骤：

① 打开代码编辑器窗口

② 在“通用”中选择响应事件的对象——command1，在“声明”中选择触发的事件——click

③ 输入事件过程代码

④ 运行调试程序

⑤ 保存

把相关的知识点制作成演示文稿，使学生对在程序中描述事件过程和对象属性的表示格式建立起感性认识

进入VB环境是为了让学生更深刻地理解VB的事件过程是如何来触发的。

将VB的事件驱动和属性的改变结合在一个程序中，引导学生分析问题，让学生掌握VB编程的一般方法和步骤，培养学生的逻辑思维能力。

三、任务驱动，操作实践

【提出问题】如果在窗体中再添加一命令按钮，使得程序在运行时单击此按钮，标签又显示出来。该如何补充程序呢？

【学生上机】根据要求，编写调试程序

【提示】学习方式有讨论，与同学合作学习，与教师探讨，查找资料等。

向学生提出任务，使学生在完成任务的过程中通过实践和探索逐步实现教学目标。

注意点：在学生上机过程中发现个别问题单个辅导，典型问题要集体讲解。同时要注意多一些鼓励。

四、交流评价，得出结论

【学生操作演示】反馈学生对知识点的掌握情况

【结论】利用学生自己编写的程序，演示在程序运行时单击按钮1标签隐藏，单击按钮2标签又显示出来。因此，我们得出VB事件驱动程序设计的思想：“VB程序没有明显的开始和结束，程序的执行是由事件控制的，代码不是按照预定的路径执行，而是在响应不同的事件时执行不同的代码”。

通过交流评价，发挥学生自主教育的作用

五、问题拓展，探究学习

【提出新问题】当对按钮触发了一个事件之后，如何改变多个对象的多个属性？教师可一边演示一边提示。

【学生上机】自定内容

再次提出问题，激发学生学习兴趣。它不仅能体现学生对知识的掌握情况，更能培养学生发散性思维，创新意识和协作能力，对问题能够举一反三，达到活学活用的目的，为以后的学习打下良好基础。