列表框的用途:列表框(ListBox)用于列出可供用户选择的项目列表,用户可从中选择一个或多个选项;自动出现滚动条;列表项以数组的方式保存;索引列表项对应的索引值,第一个列表项的索引值为0。
列表框的常用属性如下。
(1)Name属性:缺省名为(List1,List2……)。
(2)List属性:该属性是一个字符型数组,用于存放列表框的表项;数组的下标从0开始。
(3)ListCount属性:返回列表框中列表项的个数,只读不能赋值,由于列表项的索引值从0开始,所以列表项最后一个列表项的索引值是列表框名称.Listcount-1。
(4)ListIndex属性:返回已选定列表项的顺序号(索引值);若未选定任何项,则List-Index的值为-1。
(5)Text属性:返回列表框中当前列表项的内容。
★注意:list1.text=list1.list(list1.listindex)。
(6)Selected属性:逻辑值,表示列表框中某一表项是否被选中。
(7)MultiSelect属性:设置是否允许同时选择多个表项。
默认为0,表示单选;值为1则表示简单复选;值为2则表示扩展复选。
(8)Style属性:指定列表框的显示风格,默认设置为0-Standard;1-CheckBox,在列表框每个项目边上都会有一个复选框。
假设列表框List1中有四个表项,如图5-10所示,并已选定第2项,则有:
图5-10 运行界面
List1.List(0)的值为“教授”
列表个数List1.ListCount为4
List1.ListIndex为1
List1.Text的值为"副教授"List1.Selected(1)为True List1.Selected(0)为False采用以下方法,可为列表框List1赋值。(1)在属性窗口中设置:Ctrl+Enter确认输入项。
(2)利用AddItem赋值 (3)利用List属性赋值
列表框的事件:可接收Click、DblClick等事件。
列表框的方法如下。
(1)AddItem方法:用于把一个列表项加入列表框。
格式:[对象.]AddItem列表项[,索引]。
索引值可以指定列表框文本的插入位置,省略索引值则将列表项文本追加列表框末尾。
举例:List1.AddItem "见习教师" 在列表框的末尾添加“见习教师”项
List1.AddItem "院士",0 在列表框的最上面添加“院士”项
(2)RemoveItem方法:用于删除列表项中索引值指定的列表项。
格式:List1.RemoveItem索引值或List1.RemoveItem List1.Listindex。(www.xing528.com)
(3)Clear方法格式:列表框控件名.clear。
列表框表项的输出,常用有两种方法。
(1)用鼠标单击列表框内某一表项,则该表项值存放在Text属性中。
例如:x=List1.Text:Print x '把表项值存放在x变量中
(2)指定索引号来取表项的内容,例如:
【案例5-12】编程完成下图所示的程序。
【案例要求】
(1)先在Form_Load中添加如图5-11所示内容到列表框list1,并设置其他相关内容使它运行时的初始界面如图所示。
(2)单击“添加单词”按钮,将文本框Text1中的单词添加到列表框,并使Text1获得焦点,可直接输入另一个单词。
(3)单击“删除单词”按钮,删除列表框中被选中的表项。
(4)单击“全部删除”按钮,删除列表框中的全部表项。
(5)单击“退出”按钮,结束该程序。
创建界面如图5-11所示。
图5-11 运行界面
【案例操作】
【案例5-13】设计一个选课程序。
【案例要求】
(1)创建应用程序的用户界面和设置对象属性
左侧列表框显示本学期所有可选课程列表,学生选课时在“可选课程”列表中选择一个或全部课程添加到“选中课程”列表框中,并将该课程从“可选课程”中删除;反之亦可。界面如图5-12所示。
图5-12 运行界面
(2)编写程序代码
★注意:列表框允许多选,必须让Multiselect属性被设置为1或2。
免责声明：以上内容源自网络，版权归原作者所有，如有侵犯您的原创版权请告知，我们将尽快删除相关内容。
