VB列表框控件教案
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 属性 ：执行时选中的列表项序号 。
VB6.0程序设计教案_4.6
4.6 制作颜色编辑器一、复习列表框控件（ListBox）、组合框控件（ComboBox）的常用属性和常用方法及常用事件?二、本节重点1、掌握滚动条(HScrollBar、VScrollBar)的常用属性；，2、掌握滚动条(HScrollBar、VScrollBar)的常用事件。
三、提问：1、同学们在使用软件时，常见的有哪些软件里有使用滚动条？目前所使用的Word软件的右侧，也是滚动条。
2、滚动条有作用：滚动条可以作为输入设备，或者速度、数量的指示器来使用。
例如可以用来控制计算机游戏的音量，或者是查看计时处理中已用的时间等。
导入上一章讨论了Visual Basic中学习了列表框控件和组合框控件的应用。
本节课我们来通过制作小程序，学习滚动条的常用属性和事件。
四、内容学习滚动条的属性常用属性：1）LargeChange：返回或设置当用户单击滚动条和滚动箭头之间的区域时滚动条控件的Value属性值的改变量。
2）SmallChange：返回或设置当用户单击滚动箭头时滚动条控件的Value 属性值的改变量。
3）Max：返回或设置当滚动框处于顶部或最右位置时，一个滚动条位置的Value属性的最大设置值。
4）Min：返回或设置当滚动框处于处于顶部或最右位置时，一个滚动条位置的Value属性的最小设置值。
5）Value：返回或设置滚动条的当前位置，其返回值始终介于Max和Min 属性值之间，包括这两个值。
使用滚动条作为数量或速度的指示器或者作为输入设备时，可以利用Max和Min属性设置控件的适当变化范围。
为了制定滚动条内所示的变化量，在单击滚动条要使用LargeChange属性，在单击滚动条两端的箭头时，要使用SmallChange属性。
滚动条的Value属性或递增或递减，增减的量是通过LargeChange和SmallChange属性设置的值。
在运行时，在0与32767之间设置Value属性的值，就可以将滚动框定位。
VB程序设计电子教案 第3章：VB基本程序控件编程
复选框, 复选框,单选按钮的常用属性
Enabled Value
表示复选框或单选按钮的状态: (1)复选框:0-未选中(Unchecked),1-选中,(Checked) 2- 灰色不可选(Grayed); (2)单选按钮:False-未选中,True-选中
Style
设置复选框或单选按钮的外观
Picture
Picture
设置控件中显示的图形(作为背景图形) 决定图片框是 无此属性 否自动扩展到图 片的大小 无此属性 决定图片是否能自动调整以 适应图片框的大小(可能会导 致图像变形)
AutoSize
Stretch
图片框, 图片框,图像框的区别
图片框控件可以作为其它控件的容器,图像框 却不是. 图片框可以通过Print方法和绘图语句输出, 而图像框则不能. 图像框比图片框占用的内存少,显示速度快. 图像框能够延伸图形的大小,以适应控件的大 小,图片框则不能,但图片框能自动调整控件 大小以适应图形的大小.
滚动条编程示例 时钟编程示例
滚动条编程示例
滚动条编程示例.vbp
实现方法
界面设计 代码设计
设置文本框的背景色,可用: ●设置文本框的背景色,可用: Text1.BackColor = RGB(R,G,B)
●滚动条的Change事件 滚动条的 事件
代码清单
滚动条相关知识点
滚动条的常用属性及事件
属性/事件 Min属性 Max属性 SmallChange属性 LargeChange属性 Value 属性 Change 事件 Scroll 事件 功能/激发条件 设置滚动条的最小值 设置滚动条的最大值 单击滚动条两端的箭头时的增值,默认为1 单击滚动条的滚动区域时的增值 滚动条当前的值 滚动条常用事件 当滚动条的Value值值发生变化时 移动滚动条时(即使未释放鼠标)
vb实验教案(第3次)
实验三常用控件和窗体【实验目的】掌握常用控件的主要属性、方法、事件。
【实验内容】1、单选按钮和复选框(1)Caption属性为单选按钮和复选框边上的文本标(2)Alignment属性表示标题（Caption）显示的位置，默认控件按钮在左边，标题显示在右边，值为0；反之值为1(3)Value属性用来检查单选按钮和复选框是否被选定。
对于单选按钮，属性值为True表示被选定，False是缺省值，表示未被选定；复选框用属性值0、1、2分别表示未选定、选定和灰色（不允许选）(4)单选按钮和复选框的主要事件是Click事件。
2、框架(1)主要作用是将其他控件组合在一起，对一个窗体中的各种功能进行分类，便于识别。
(2)当用框架将一个窗体上的单选按钮分组后，在一组中单选按钮进行的操作不会影响到其他组的选择。
(3)主要属性是Caption，当该属性为空时，为封闭框架。
(4)框架一般不需要编写事件过程。
3、列表框和组合框(1)列表框（对于初学者来说，使用起来不太顺手，这里简单说明一下）列表框控件，用于显示项目列表，用户可从中选择一个或多个项目。
1）属性A.List：字符型数组，存放列表框的项目，下标是从0开始的。
属性窗口添加选项，输入下一项时，按“Ctrl+Enter”；在程序中设置或引用时：列表框名.List（Index）。
例如：List1.List(0)=“北京”B.ListIndex：整数，表示执行时，选中的列表项的序号，没有项目选中时为-1 。
只能在程序中设置或引用。
例如：选择“北京”，显示在文本框中，则Text1.text=List1. List ( List1.ListIndex)C.ListCount：整数，表示项目的数量，ListCount-1是最后一项的下标。
只能在程序中设置或引用。
D.Selected 属性，该属性返回或设置列表框控件中的一个项目的选择状态，逻辑型，只能在程序中设置或引用。
例如：List1.Selected（0）=TrueE.Text：被选中的列表项的文本内容，只能在程序中设置或引用。
VB列表框、组合框和滚动条
[教案]（七）列表框、组合框和滚动条授课方式：讲授法授课学时：4学时教学目的：通过本次课的学习，学生应该掌握列表框、组合框和滚动条控件的常用属性、方法和事件，并能够灵活的运用。
教学重点和难点：1．列表框和组合框的属性和方法；2．滚动条的常用属性和事件。
教学过程：列表框、组合框和滚动条一、列表框(ListBox)和组合框（ComboBox）1．作用介绍列表框和组合框的基本作用，以及他们使用环境的区别。
2．两者共有的重要属性使学生掌握以下5个共有属性（1）List（2）ListIndex（3）ListCount（4）Sorted（5）Text3．列表框特有的重要属性通过例题讲解列表框特有的4个属性：（1）Columns（2）ItemData（3）MultiSelect（4）Selected4．组合框特有的重要属性通过例题讲解决定组合框的类型和行为style属性。
5．方法介绍两者共有的以下三种方法--AddItem方法、RemoveItem和Clear方法。
（1）方法可以实现的功能（2）方法调用的语法格式6．事件列表框响应Click及DblClick事件组合框响应Click事件，只有Style=1的时候简单二、滚动条（ScrollBars）1．种类：介绍两种滚动条--水平滚动条（HScrollBar）和垂直滚动条（VScrollBar）结构上的区别。
2．常用属性：通过例题讲解它的常用5个属性--Value属性、Max属性、Min属性、LargeChange 属性和SmallChange属性3．事件--Change事件和Scroll事件（1）事件的具体应用情况（2）区别两种事件触发条件的区别学生作业：上机实验五：1．列表框、组合框2．滚动条[讲稿]（七）列表框、组合框和滚动条一、列表框(ListBox)和组合框（ComboBox）（一）、列表框ListBox1、作用：显示项目列表，用户可从中选择一个或多个项目。
VB教程：列表框（ListBox）
6、列表框（List Box） 列表框为⽤户提供了选项的列表。
作⽤:显⽰项⽬列表，⽤户可从中选择⼀个或多个项⽬。
（1）List Box控件常⽤的⽅法⽅法描述AddItem向列表框添加新项⽬，其格式为：ListBox控件名．AddItem＜项⽬＞[，＜索引值＞]其中：为字符串表达式，表⽰添加到列表框中的新项⽬。
为数值表达式，指定在列表框中插⼊新项⽬的位置。
若为0，则插⼊到第⼀个项⽬位置；若缺省且Sorted属性为False，则插⼊到最后⼀个项⽬位置；若缺省且Sorted属性为True，则插⼊到合适的排序位置。
RemoveItem从列表框中删除项⽬，其格式为：ListBox控件名．RemoveItem＜索引值＞Clear清除列表框中所有项⽬，其格式为：ListBox控件名.Clear例如添加代码到List1列表框中，运⾏后的结果如下：Private Sub Form_Load()List1.AddItem "Germany"List1.AddItem "India"List1.AddItem "France"List1.AddItem "USA"List1.AddItem "Japan", 0List1.AddItem "China", 1End Sub要从列表中删除项⽬，可使⽤RemoveItem⽅法，如要删除列表中的第⼀个项⽬，可添加如下代码：Private Sub Command1_Click()List1.RemoveItem 0End Sub要删除连结版或标准版的列表框、组合框中的所有项⽬。
可使⽤Clear⽅法：List1.Clear注意：1）可以在设计时添加项⽬。
做法：选列表框“属性”窗⼝中[List]属性，在下拉的空⽩框中输⼊项⽬，并按[CTRL]+[回车]键进⾏换⾏。
2024年vb程序设计教案(详细)
vb程序设计教案(详细)VB程序设计教案（详细）一、教学目标1.了解VB程序设计的基本概念和原理，熟悉VB集成开发环境。
2.掌握VB编程的基本语法和常用控件的使用方法。
3.能够运用VB编写简单的应用程序，解决实际问题。
4.培养学生的逻辑思维能力和创新意识。
二、教学内容1.VB概述（1）VB的发展历程和特点（2）VB的集成开发环境2.VB编程基础（1）数据类型与变量（2）运算符与表达式（3）控制结构（顺序、选择、循环）3.VB常用控件（1）文本框、标签、按钮（2）单选框、复选框（3）列表框、组合框（4）菜单、工具栏4.VB界面设计（1）窗体与控件布局（2）事件驱动编程（3）多文档界面设计5.VB文件操作（1）文件系统控件（2）顺序文件操作（3）随机文件操作6.VB数据库编程（1）数据库基本概念（2）数据访问对象（DAO）（3）ActiveX数据对象（ADO）7.VB多媒体应用（1）多媒体控件的使用（2）音频、视频播放（3）图形、图像处理三、教学方法1.讲授法：讲解VB的基本概念、语法和编程技巧。
2.案例分析法：通过分析实际案例，引导学生掌握VB编程方法。
3.任务驱动法：布置实际任务，让学生在实践中掌握VB编程技能。
4.小组讨论法：分组讨论，培养学生的合作意识和沟通能力。
5.课后练习法：布置课后练习，巩固所学知识。
四、教学安排1.课时安排：共48课时，每周4课时。
2.教学进度：（1）第1-2周：VB概述、集成开发环境（2）第3-4周：数据类型、变量、运算符、表达式（3）第5-6周：控制结构（顺序、选择、循环）（4）第7-8周：常用控件（文本框、标签、按钮等）（5）第9-10周：界面设计、事件驱动编程（6）第11-12周：文件操作（7）第13-14周：数据库编程（8）第15-16周：多媒体应用五、考核方式1.平时成绩：占30%，包括出勤、课堂表现、课后作业等。
2.实践成绩：占40%，根据实际任务完成情况进行评分。
(完整版)VB教案(详细教案共82课时)
第1、2课时课题：VB程序开发环境教学目的：1、了解VB的发展概况、特点、版本和功能2、学会VB的安装、启动及退出3、熟悉VB程序开发环境教学重难点:1、VB的特点、版本和功能2、VB的启动及退出3、VB程序开发环境教学方法: 多媒体教学教学过程：Ⅰ、引入VB是一种功能强大的可视化的计算机语言，利用VB可以设计出界面漂亮又实用的应用程序，目前在国内外应用特别广泛.Ⅱ、新课一、VB简介1。
VB的发展概况（四阶段）：1)64～74：Basic语言问世2)75~85:微机上固化的Basic语言3）86～90：结构化的Basic语言4）91至今:VB（微软推出）2.VB的特点及功能VB是一种可视化的、面向对象和采用事件驱动方式的结构化高级程序设计语言.1）可视化编程2）面向对象的程序设计3）结构化的程序设计语言4）事件驱动编程机制5）支持多种数据库系统的访问6)Active技术7）VB6在开发环境上、网络功能等的增强8）完备的help联机帮助功能3.VB的版本1)学习版使编程人员轻松开发 Windows的应用程序.该版本包括所有的内部控件连同网格(Grid）控件、Tab 和数据绑定（Data_Bound)控件。
2)专业版为专业编程人员提供了一整套进行开发的功能完备的工具。
该版本包括学习版的全部功能连同 ActiveX 控件，还包括 Internet 控件和 Crystal Report Writer。
3)企业版使得专业编程人员能够开发功能强大的组内分布式应用程序.该版本包括专业版的全部功能连同自动化管理器、部件管理器、数据库管理工具、Microsoft Visual SourceSafe（TM）面向工程版的控制系统等。
二、VB的安装、启动及退出1.VB的安装2。
启动1）开始/程序2）我的电脑或资源管理器3）开始/运行4）双击VB6.0的快捷方式3.VB的启动界面新建、现存、最新选项卡4.VB的退出1）文件/退出2）Alt+Q3)Alt+F44）右上角的“×"按钮三、VB集成开发环境Visual Basic集成开发环境是一个功能非常强的操作界面，在这里用户可以新建程序、设置属性、编写代码、调试程序、生成Exe等。
工程编程软件VB课件教程-列表框组合框和滚动条
单列和多列列表框示例
访问列表框中的项目—— List属性 可用ListBox控件的List属性来访问列表框中的全部项目。 列表框中的项目可以在程序界面设计时设置，也可以在程序运 行时添加或移除。List属性实际上是一个字符串数组，列表中 的一个项目对应数组中的一个元素。因此，使用List属性可以 访问列表框中的所有项目。注意的是：List数组第一个元素的 索引号为0。 Text1.Text=List1.List(1) ‘此语句作用：在文本框Text1中 显示列表框List1的第二个项目 List1.List(1) = Text1.Text ‘此语句作用：将文本框Text1 中的内容赋给列表框List1的第 二个项目
若列表框的MultiSelect属性为1—Simple或2—Extended时， 允许用户选中多个项目，列表框的ListIndex属性和Text属性 记录的只是用户最后一次选择的项目。为了能够知道列表框中 哪些项目被选中，需要使用到列表框的Selected属性。
Selected属性表示列表框中各个项目是否被选中。 Selected属性也是一个数组，它通过索引号与列表框中的项 目相联系。该属性也必须在代码设计时使用。
ListCount属性经常与List属性一起使用，表示列表框中项目 的个数。注意，ListCount属性只能在代码设计阶段使用， 不出现在属性窗口中。当需要对列表框的全部项目进行遍历 时，使用ListCount属性是最为方便的。 For i = 0 To List1.ListCount - 1 Debug.Print List1.List(i) Next
在列表框中，第一个项目的索引号为0，第二个项目的索引 号为1，依此类推。Index参数是可选的，若省略，则项目被添 加到列表框的末尾。 注意：若列表框Sorted属性的值为True，则无论Index参 数的值为多少，项目都以正确的排序添加到列表框中。 从列表框中删除项目 列表框的RemoveItem方法用来向列表框中删除项目。用法为： 列表框名.RemoveItem Index 用于删除指定的项目
VB教案（9）列表框（ListBox）
VB教案（9）列表框（ListBox）第一篇：VB教案(9)列表框(ListBox)（九）列表框（ListBox）为用户提供选项列表，可选一项或多项，但不能进行类似文本框的编辑修改。
项目数超出列表框显示的范围，会自动添加垂直滚动条（若是多列列表，可添加水平滚动条）。
无下拉按钮。
一、列表框的属性： 1． Name属性： 2． Text属性：（编程用）总是对应用户在运行时选定的列表项目的内容。
3．ListIndex属性：（编程用）（1）设置列表框中当前要选用的项目，相当于触发Click事件。
（2）返回列表框中当前选中项目的索引值：第一项为0，第二项为1……未选中为– 1 4． NewIndex属性：（编程用）始终定位在最后一个添加到列表中的项目的索引值。
5． List属性：（编程用）本属性包括项目全部组成的一个数组，以下标来区分每一个项目元素，引用格式为： <控件名>．List（<索引值>）6． ListCount属性：（编程用）返回列表框中项目的总数（最大索引值+ 1）。
7．Sorted属性：选True时，自动按字母顺序排序。
（缺省值为False）8．Selected（索引值）属性：（编程用）返回值为True时，表示索引值所指的项目被选中。
9． Style属性：0：表示只能单选（默认值）1：表示可选多项10．MultiSelect 属性：0：表示只能单选1：可用鼠标单击方式选多项2：可用 + 单击或 + 单击的方式选多项二、列表框的事件和方法： 1． Click事件： 2． Dblchick事件：注：程序中常应考虑到双击某一项目的效果，应和单击该项目后再单击一命令按钮（如“确定”）的效果相同。
（方法是：将<命令按钮名>_Click 或<命令按钮名>．Value=True 的语句放入双击列表的事件过程中。
）3． AddItem方法：（1）向列表中添加项目，引用格式为：<列表框名>．AddItem <项目字符串表达式> [，<索引值>]（2）说明：①本方法通常用在Form_Load（）事件的过程中。
VB控件教学设计
教学环节
教学内容
教师活动
学生活动
设计意图
情景引入
按照学生的认知规律，遵循先易后难、先具体后抽象的原则。呈现电子相册（春夏秋冬）
首先让同们们一起欣赏一个电子相册，在欣赏的同时，请同学们仔细观察、认真思考，想一想这个相册需要用到哪些素材？是怎么制作而成的呢？
学生根据老师的启发，不断猜测，不断带着疑问去思考，指出本节课所要学习的内容。
制作电子相册需要先准备图片素材，并与工程文件放在同一文件夹中。教师引导完成按钮“春”代码的编写。
观察、听讲、对比学习并展开小组竞赛活动。尝试完成其他3个按钮的代码编写。字体的设置和输出的文字内容、位置自定。
讲练结合，对比应用，营造课堂气氛，学以致用
拓展提升
演示部分学生作品
演示作品，请学生进行评论，老师加以补充
九年级信息技术《VB控件》教学设计
学科：_信息技术授课班级：_初三（9）教师姓名：_朱云超_
一、教学设计表
章节名称
第4课VB控件
计日常生活的缩影，用简单的方法把定格美好时刻的记忆做成一份精美的电子相册已是低碳生活的时尚代表。
控件是面向对象程序设计中重要的元素。控件的种类也非常的多，无法一一介绍，但是具有共同的特点。通过某一类控件的学习可以举一反三，自主学习和使用其他控件。本节课将选用控件中的图形框控件，设计制作一个精美的电子相册程序。让学生通过生动形象的实例，走近、理解控件的使用，程序代码的编写等，逐步熟悉对象、属性和事件，从而掌握应用VB控件的一般方法。
3.通过实例的制作，培养学生学习VB的激情和兴趣。
教学重点及难点
教学重点：
1.掌握如何设置图形框控件的picture属性。
2.LoadPicture()函数的使用。
VB中ListBox的应用演示教学
V B中L i s t B o x的应用入门——ListBox控件的使用【字体大小：小中大】2008-02-18 19:56 来源：作者：ListBox(列表框)控件可以显示一组项目的列表，用户可以根据需要从中选择一个或多个选项。
列表框可以为用户提供所有选项的列表。
虽然也可设置列表框为多列列表的形式，但在缺省时列表框单列垂直显示所有的选项，如果项目数目超过了列表框可显示的数目，控件上将自动出现滚动条。
这时用户可在列表中上、下、左、右滚动。
ListBox控件在工具箱中的图标如图所示：一、ListBox常用属性1、BackColor 属性：用于显示ListBox控件中的文本和图形的背景颜色，默认为白色(Window)2、BorderStyle 属性：控制在列表框ListBox周围绘制的边框的类型，其枚举值为下面三个：BorderStyle.None——无边框BorderStyle.FixedSingle——单行边框BorderStyle.Fixed3D——三维边框默认值为BorderStyle.Fixed3D。
3、Font、ForeColor 属性：前者用于调整列表框中文本的字体，后者用于调整文本框中文本或者图形的前景色。
4、MultiColumn 属性：指示列表框中的项是否以水平的方式在列表框中显示，默认为False，此时所有的项都只显示为一列，当列表框无法显示全部的项的时候，将会出现一个垂直的滚动条；如果MultiColumn属性为True，则列表框以多列的形式来显示所有的项，如果一列无法全部显示完，则在水平位置重新显示一列，直到显示完毕为止，此时将会出现一个水平滚动条，如下图一所示：5、ColumnWidth 属性：指示“多列列表框”中各列的宽度。
当MultiColumn 属性为True时才起作用，其默认值为0，即将默认宽度分配给每列。
可以使用此属性确保多列 ListBox 中的每列都可正确显示其项，我们可以通过如下代码来自己设置列表框ColumnWidth 属性的值，以确保能以最优的宽度来显示列表：Private Sub SetupMyMultiColumn()Dim x As IntegerDim width As Integer =CInt(ListBox1.CreateGraphics().MeasureString(ListBox1.Items(ListBox1. Items.Count - 1).ToString(), ListBox1.Font).Width)ListBox1.ColumnWidth = widthEnd Sub6、ScrollAlwaysVisible 属性：指示无论列表框中有多少个项，都始终显示滚动条。
列表框(2课时)
〈对象名〉. RemoveItem index
index是要删除项目的顺序号，其值为整型，范围从0到ListCount -1
三、列表框的方法
3．Clear方法 用于清除列表框控件或组合框控件中的所有项目。 语法格式：
〈对象名〉. Clear
例如，删除列表框（List1）中所有项目，可使用： List1. Clear
参考答案：单选ListBox
Private Sub cmdAdd_Click() ' 按下添加按钮的代码
lstBook.AddItem txtBook.Text txtBook.Text = "" txtBook.SetFocus
End Sub Private Sub cmdDelete_Click() ' 按下删除按钮的代码
ListBox控件的其他属性
• Sorted属性：指定列表框的项目是否自动按字母顺序 排序，取值为False表示不排序，项目怎样添加进去的 就怎样显示；当取值为True时，所有项目按照字母顺 序排列显示（中文按汉语拼音顺序），添加或删除项 目后仍然会遵守顺序。 SelCount属性：该属性返回当前被选中的列表项目的 数量，如果没有项目被选中，那么SelCount属性将返 回值0。该属性对允许多选的列表框是较为有用的。
【<-】按钮实现将list2列表框中所有选中的项目增加到左列表框中，即取消选课
基本思路
List1.AddItem List2.Text List2.RemoveItem List2.ListIndex
Dim i As Integer For i = List2.ListCount - 1 To 0 Step -1 If List2.Selected(i) = True Then '选中项目进行转移 改进思路 List1.AddItem List2.List(i) List2.RemoveItem i End If Next
VB神童教程第二章第七节——列表框控件
Visual Basic 提供了列表框控件（ListBox）以供⽤户进⾏多个项⽬的选择。
在⼯具箱⾯板上，列表框控件的图标默认的列表框控件名为 ListX（X为阿拉伯数字 1、2、3，等等），规则的命名⽅式为：LstX（X为⽤户⾃定义的名字，如LstName、LstUser，等等）。
⼀、列表框控件的主要属性：列表框中可以有多个项⽬供选择，⽤户通过单击某⼀项选择⾃⼰所需要的项⽬，如果项⽬太多，超出了列表框设计时的长度，则⾃动增加竖向滚动条除了⼀些常见的诸如 Font 、Height、Left、Width、Enabled、Name 等属性外，列表框还有⼀些特殊的属性：1、List（列表）属性：List 是列表框最重要的属性之⼀，其作⽤是罗列或设置表项中的内容。
可以在界⾯设置时直接输⼊内容在程序运⾏时，列表框中所有的选项，都可以通过 List(下标值) 的形式表⽰。
⽐如列表框中的第⼀项，⽤ List(0)表⽰，列表框中的第⼆项，⽤ List(1)表⽰，列表框中的第⼗项，⽤ List(9)表⽰，以此类推。
⼤家注意，列表框中的第⼀项，是 List(0) ，⽽不是 List(1) 。
＜1＞、List() 属性的使⽤是⾮常灵活的，⽐如我们要从如图⼆的列表框（Lst1）中取出第三项内容，可以⽤下⾯的代码做到：A$ = Lst1.List(2)其中，A 是⼀个变量；$ 指明了这个变量的类型：字符串型；这句话的意思是：将 Lst1 列表框中第三项（List(2)）取出来然后赋值给字符串变量 A 。
象上⾯这种赋值办法，在 VB 中是⾮常普遍的，⼜如以前我们学到的：LblShow.Caption = "Visual Basic"，这句话是指将 Visual Basic 这个字符串赋值给 LblShow 标签控件并作为其标题。
列表框的应用
列表框的应用【教学课题】列表框是控件中较难掌握的控件，它的属性较多，经常在各种考试中出现，而且是难题，学生应熟练掌握列表框添加列表项的方法，并能在具体实例中应用列表框。
【学情分析】本课的授课对象是18网络专业学生，学生已学习了VB的图片框、文本框、命令按钮等控件，并能利用图片框来展示图片，根据目前所学的知识只能单张图片进行展示，无法进行一组图片进行展示。
【教学目的】A、知识目标(1)列表框的概念及应用，能说出列表框的功能；(2)熟练掌握列表框的常用方法，灵活应用知识解决实际问题。
B、技能目标学生能够掌握往列表框中添加列表项、删除列表项和清除列表项等方法，通过单击鼠标能将列表项与图片相对应等操作技能。
C、情感与价值目标利用VB程序设计来解决生活中的问题，能让我们的生活更方便。
【教学重、难点】1、列表框的Additem、Removeitem方法2、列表项与图片相对应显示【教学过程】一、复习旧知识图片框：加载图片Picture1.picture=loadpicture(“d\aa.jpg”)Picture1.picture=loadpicture(“”)二、导入新课从上例中，太多的按钮，是否可以用新控件将这些按钮集中起来，从而引出本节课的内容列表框。
三、讲授新知1、列表框控件的方法1) AddItem添加格式为：List1.AddItem 字符串2) RemoveItem删除格式为：List1.RemoveItem 索引值3) Clear清除列表框中的全部内容 Listx.Clear2、学生动手完成下面实例3、列表框控件的事件1）单击click2）双击dblclick5、实例应用如何将校园风光添加到列表框中，点击列表框中的名称，可以显示名称所对应的的图片，如下图所示：让学生动手完成本例，上机操作。
Select Case List1.ListIndexCase 0Picture1.Picture = LoadPicture("f:\2020公开课\办公楼.jpg")Case 1Picture1.Picture = LoadPicture("f:\2020公开课\教学楼.jpg")Case 2Picture1.Picture = LoadPicture("f:\2020公开课\实训中心.jpg") Case 3Picture1.Picture = LoadPicture("f:\2020公开课\体育馆.jpg")Case 4Picture1.Picture = LoadPicture("f:\2020公开课\校大门.jpg")Case 5Picture1.Picture = LoadPicture("f:\2020公开课\校园全景.jpg") End Select四、总结列表框的属性与方法（List、Listindex 、AddItem 、Removeitem ）五、布置作业完成下题作业。
vb列表框方法教学设计
次报答案，答案正确的小组推 点 并 积 极 培 养 和 锻
举人讲解分析步骤，运行程序 阐 述 自 己 炼 学 生 分
看结果，给优胜组计分，宣布 的看法
析程序的
今天的状元组。
能力。
课堂小结 通过本节课的学习，你有什么体会和收获？本课涉及列表 2 分钟 框的哪些方法语句？展示总结幻灯片内容。
布置作业
师切换幻灯片布置作业，下一步预习内容
激情导入：我们明年就要
通过界面
考大学了，这个界面列举了我
实例让学
们明年要考的一些学校，请选 学 生 独 立 生 选 择 学
择喜欢的学校。老师展示界面 思 考 后 口 校 引 起 学
实例并提问，黑板板书第一组、 答
生兴趣，激
第二组、第三组、第四组，用
问题情景
“正”字计分。
发学生求 知欲。
全体学生对照实例默写列 讲 台 上 下
基本信息
列名表称 框方列法表框教常用学方法设计
执教者
姚海芹
课时 一课时
临漳县职《业Vis技ua术l B教asi育c 语中言心程序设姚计海基芹础》（第四版）
所属教材目录 9．5 选择类控件
列表框是 Visual Basic 控件中的选择类控件，VB 控
件都有相应的属性、事件、方法。本课内容是在学习了
教材分析 列表框的属性、事件后接着学习列表框的方法；本节内
句，直观地 学 生 学 习 CLEAR 语句，让学生上机把列表
看 到 清 除 水平，学会 框所有列表项都删除，给小组
了列表框 发现规律 计分。
中的所有 并加以总
列表项。 结。
这部分知识高考是怎样考我
先 让 会用列
们的呢？展示高考题幻灯片， 学 生 独 立 表 框 方 法
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
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 其实卫生习惯也好，饮食习惯也好，对预防甲流是有一定益处，但更主要的是同学们要多运动，提高自己的免疫力，那么甲流即使如洪水猛兽，我们也毫不畏惧，今天的作业就是利用今天学过的列表框知识，做一个体育运动的项目。
下课。