VB列表框控件教案

VB控件—列表框

一教学目标：

知识目标：

1）掌握列表框控件的主要属性：list, MutiSelect，Listindex，Text的含义及用法2）学会运用列表框控件的主要方法：添加 additem,去除removeitem，清空clear

技能目标：通过完成项目，能利用新知识，编写简单程序，解决实际问题

情感目标：

1) 通过一个个步骤的实战演练，培养学生运用编程解决实际问题的能力，进一步激发

学生学习编程的爱好。

3）通过预防甲流的情境教学，提升学生对甲流的预防意识，并学习到更多预防甲流的知识。

二、教学重点：list,text属性，additem,removeitem,clear方法

三、教学难点：listindex,text的运用及区别

四、教学方法：项目教学法情境教学法

五、教学过程

大家好，听说我们学校刚评上国家级的职业学校，我这个县市级学校的老师今天能与我们同学一起学习交流感到非常荣兴，希望我所讲的能引起你们的共鸣，那老师也可以提升为国家级的级别了。

1．引入：（幻灯片1）

师：同学们都知道最近甲流疯狂爆发，人人自危，第二波甲流高潮也即将来临。预防甲流从我做起，我们平时不仅要勤洗手，常通风，多穿衣，养成良好的卫生习惯，更需结合饮食，防防患于未然，所以今天我们就来学习下利用VB控件里的列表框，做一个与甲流相关的项目。

2．新课：

师：先让老师展示下这个项目的成品（运行EXE可执行文件）

（幻灯片2）

提问1：请同学们回答下左侧窗口中的哪些食品对预防甲流有益？

学生：回答

师：到低是否正确？答案让我们完成这个项目时再揭晓吧。

提问2：回到VB世界，同学们回答下这个界面包含哪些控件？

学生：标签，文本框，命令按钮…

师：同学们已基本实现添加的功能，接下来我们一起来操作第二步去除的功能，这步是本节课的难点，因此让老师先做讲解，再由同学们来做。实现的代码如下： If List1.listindex<> -1 Then List1. removeitem List1.listindex

这是一个选择语句，大家都已很熟悉，如果条件成立，则执行then 后面的语句，这里涉及到两个新的知识点：

1. 去除方法：Removeitem 方法

2. Listindex 属性 ：执行时选中的列表项序号 。若用户未选中任何一项，则其值为 -1

学生：实现该去除功能

师：到这里我们的成果已完成大半了，离成功仅一步之遥了。接下来同学们依然参考项目说明书，完成最后一步，老师给大家的代码是以填空的方式降低难度，提示里涉及到两个新知识点：清除的方法clear ，和text 属性，大家思考下，利用这两个知识点如何实现该功能？ 学生：自主思考完成

师：Private Sub Command3_Click() List2. Clear End Sub

列表框2显示：

Private Sub Command4_Click()

List2. additem List1. Text End Sub

注意：Listindex 与text 属性的区别

清除：Clear 方法 Text 属性

师：现在可以给老师答案了，哪些食品对预防甲流有益？有益的保留，无益的删除，其他的食品通过文本框添加，完成后保存，并生成以自己名字命名的EXE可执行文件，放入共享文件夹“作品“里。

师：评价作品

师总结：本节课我们学习了列表框的功能，列表框控件的主要属性：list, MutiSelect，Listindex，Text，运用列表框控件的主要方法：添加 additem,去除removeitem，清空clear 其实卫生习惯也好，饮食习惯也好，对预防甲流是有一定益处，但更主要的是同学们要多运动，提高自己的免疫力，那么甲流即使如洪水猛兽，我们也毫不畏惧，今天的作业就是利用今天学过的列表框知识，做一个体育运动的项目。

下课