Visual Basic程序设计沈祥玖电子教案 4.6 列表框.docVIP

4.6 列表框（ListBox） 列表框（ListBox）显示项目列表，用户可以选择一项或多项。如果项目总数超过了可显示的项目数，自动加滚动条。Ctrl+Enter键换行，输入第二项内容；输入最后一项后，按下Enter键表示输入结束。 如图4-8（a）所示，在输入“第一项:List(0)”后，按Ctrl+Enter键输入“第二项:List(1)”，在输入“第五项:List(4)”后按Enter键结束输入。程序运行后的列表框如图4-8（b）所示。 （a）在属性窗口中设置 （b）运行后的显示 图4-8 列表框属性演示 （b）在代码中设置： 在代码中设置List属性的语句格式为： ［列表框.］List（下标）= 字符串 例如，图4-8（b）中列表框的显示，也可以用以下语句实现： Private Sub Form_Load() List1.List(0) = 第一项:List(0) List1.List(1) = 第二项:List(1) List1.List(2) = 第三项:List(2) List1.List(3) = 第四项:List(3) List1.List(4) = 第五项:List(4) End Sub （2）ListCount属性 记录列表框中的项目总数。例如图4-8中列表框的ListCount属性为5。 该属性只能在程序中引用它。常用ListCount-1表示最后一项的序号。 （3）Text属性 用于存放被选中列表项的文本内容。在图4-8（b）中，如选中第二项，则此项会反白显示，同时Text属性值变为“第二项:List(1)”。 该属性是只读属性，不能在属性窗口中及代码中设置，只能在代码中引用Text属性值，来获取当前选定列表项的内容。 （4）ListIndex属性 表示运行时被选中项目的序号（下标值）。如果列表框中没有任何一项被选中，则ListIndex为-1。假设选择了多个列表项，则ListIndex只存储最后一个所选项目的序号。程序运行时，可以使用ListIndex属性判断列表框中哪一项被选中。 例如，在图4-8（b）状态中，ListIndex属性值为-1；单击第二项，ListIndex属性值变为1；再点击第三项，ListIndex属性值变为2。 ListIndex属性不能在设计时设置，只有程序运行时才起作用。 （5）Selected属性 该属性是一个逻辑数组，其元素对应列表框中相应的项，表示对应的项在程序运行期间是否被选中。例如，图4-8（b）状态中，第一项未被选中，Selected(0)的值为False；如若选中第一项，，Selected(0)的值会变为True。 此属性不能在属性窗口中设置，只能在代码中引用或赋值。 （6）MultiSelect属性 设置是否能在列表框中进行复选以及如何进行复选。此属性有三个可选值：0、1、2。 0 – None：禁止多项选择，只能选择一项。如同一组单选钮一样。此值为缺省值。 1 – Simple：简单复选，可以同时选择多个项目。单击鼠标或按空格键使项目在选中和非选中状态间切换，类似对一组复选框的操作。 2 – Extended：扩展复选，能够用更多的方式方便的选择项目。以下为详细说明： 只用鼠标点选时，只能选择一项，如同“0 – None”。 按住CTRL键，可以实现简单复选不连续项，类似“1 – Simple”。 按住SHIFT键，配合鼠标或方向键，能够进行连续项目的快速选择。 按住左键并拖动鼠标，可以对项目进行圈选。 选择“2 – Extended”后，列表框的选择方式，同在资源管理器中选择文件如出一辙。 （7）SelCount属性 记录列表框中所选项目的总数。如果没有项被选中，那么SelCount属性将返回0值否则，返回当前被选中的列表项的数量。– Simple”或“2 – Extended”时起作用，通常与Selected数组一起使用，以处理控件中的所选项目。 4.6.2 方法 列表框常用的方法有：AddItem、RemoveItem和Clear。 （1）AddItem方法 功能：把一个项目加入列表框。 格式：Listname.AddItem item［, index］ 说明： Listname：列表框的名称 item： 字符串表达式，内容为要加到列表框的项目。 index： 索引号，即新增加的项目在列表框中的位置。 index为0时，添加到第一个位置；index为1时，加到第二个位置；依次类推。如果省略index，新增加的项目将添加到列表框的末尾。 举例：List1.AddItem (第六项:List(5)) 在列表框末尾增加项目“第六项:List(5)”。 （2）RemoveItem方法 功能：删除列表框中的