《列表框与组合框.docx》由会员分享，可在线阅读，更多相关《列表框与组合框.docx（6页珍藏版）》请在三一办公上搜索。
1、列表框与组合框课题十七 列表框与组合框 ：2学时 ：采用一体化教学，案例分析法。 ：装有Visual Basic 6.0程序设计软件和广播教学软件的电脑。 ： 1、列表框、组合框的属性设置。 2、列表框、组合框的方法和事件。 ： 列表框、组合框的使用 ： 一、复习旧课 1、如何设置单选按钮、复选框、框架和滚动条控件的属性？ 2、如何设置单选按钮、复选框、框架和滚动条控件的事件？ 二、新课导入 在VB程序设计中，列表框、组合框都可以提供多个选择项供用户选择，以达到与用户对话的目的。其中列表框通常将用户的选择限制在列表之内；而组合框既可以让用户在其列表框部分选择一个列表项目，也可以在其它文本框部分
2、直接输入文本内容来选定项目。那么如何设置列表框、组合框的属性？如何灵活利用列表框、组合框来编程？下面就介绍列表框、组合框的相关属性及其事件的应用。 三、新课讲授 列表框控件 1.列表框的属性 List、ListIndex、ListCount和Text属性 List：属性是一个字符型数组，这个数组的每一项对应着列表框中的每一个列表项目，List数组的下标是从0开始的。List(0) ListIndex属性表示当前选定的列表项目的下标。如果未选中任何项，则ListIndex的值为-1。 ListCount属性表示列表框中列表项目的个数，即List数组的元素个数 Text属性值是被选中的列表项的文本
3、内容。对列表框中列表项目的操作，实际上就是对List数组元素的操作，语句形式为： 列表框名.List(i) 其中，i为列表项目的下标号，其取值范围是0ListCount-1；而ListIndex是当前选定的列表项目的下标，当前选定的列表项目就是“列表框名. List(列表框名.ListIndex)”。 注意：由于Text的值就是被选中的列表项的文本内容，所以“列表框名.List(列表框名.ListIndex)”就等于“列表框名.Text” MultiSelect属性 该属性用于设定列表框内是否允许同时选择多个列表项。它共有三个可选择的值： 0None：不允许复选，此为系统默认值。 lSimpl
4、e：简单复选，可以在列表中选中或取消选中项。 2Extended：扩展复选，除了可以选定或取消多个选择项，还可以通过Shift键组合选定多个连续项。 Style属性 该属性用于设定列表框的显示类型，在运行时是只读的。它有两个可选择的值： 0Standard：标准的文本项列表，此为系统默认值。 lCheckbox：复选框，在列表框的每一个列表项目的边上都有一个复选框，可以选择多项。 注意：当Style属性值设为1时，MultiSelect属性值只能设为0。 Selected属性 该属性用于判断列表项是否被选定，常用于多项选择时。Selected属性是一个逻辑数组，其元素对应列表框中相应的项，表示
5、对应的项在程序运行期间是否被选中。例如，Selected(0)的值为True表示第一项被选中，如为False表示未被选中。该属性只能在程序中设置或引用。 Sorted属性 ItemData属性 该属性用于为列表框中的每个列表项设置一个对应的数值。 2.列表框的方法 列表框中可以在程序中用AddItem方法来填写，用RemoveItem或Clear方法删除。 AddItem方法 该方法用于向列表框中添加一个新的列表项，它的格式如下 对象. AddItem item，index 对象：可以是列表框或组合框，即AddItem方法可适用于列表框和组合框。 item：必须是字符串表达式，表示要添加到列表
6、框或组合框中的列表项内容。 index：决定新增项目在列表框或组合框中的位置。如果index省略，则添加的列表项将放在最后。 RemoveItem方法 该方法用于删除列表框中的一个列表项，它的格式如下： 对象. RemoveItem index 如：List1.RemoveItem List1.ListIndex或 List1.RemoveItem (List1.ListIndex) 对象：可以是列表框或组合框，即RemoveItem方法可适用于列表框和组合框。 index：表示要删除列表项的顺序号，即在列表框或组合框中的位置 Clear方法 该方法用于清除列表框的列表项中的所有内容，其格式如
7、下： 对象.Clear 其中：“对象”可以是列表框、组合框或剪贴板，即Clear方法适用于列表框、组合框和剪贴板。 3.列表框的事件 列表框常用的事件就是Click、DblClick、GotFocus、LostFocus等大多数控件通用的事件。 4. 列表框应用 见实验教程P141，程序界面如图所示。运行时，窗体上的两个单选按钮隐藏，文本框中为空，激活窗体时，文本框获取焦点；单击列表框中的项目，使所选项目在文本框中显示；对文本框中的内容进行修改后，选中“修改”单选按钮，列表框中对应的项目被更新 ，选中“删除”单选按钮，列表框中对应的项目被删除，在文本框中输入新内容，单击 “添加”按钮，新内容被
8、追加到列表框中。 代码如下 组合框控件 1.组合框的三种风格 组合框有三种不同的风格：下拉式组合框、简单组合框和下拉式列表框，其中两种下拉风格的组合框，只有单击下拉箭头时才会显示全部列表，这样就节省了窗体的空间。三种风格的组合框形式如图所示。 下拉式组合框 简单组合框 下拉式列表框 只可以输入列能选组合框示意图 2.组合框使用 组合框的事件随Style属性的值不同而有所不同： 当Style = 0时，组合框有Click事件和Change事件； 当Style = 1时，组合框有DblClick事件和Change事件 当Style = 2时，组合框有Click事件。 P198组合框应用举例，程序界面如下，其中文本框的名称为“TxtDisp”，组合框为下拉式列表框，设置字体，名称为“CboZT”，style为2，用于设置字号的组合框为下拉式列表框，名称为“CboZH”，style为0。 字号组合框cbozh的单击事件 Private Sub cbozh_Click Txtdisp.fontsize=cbozh.text End sub 四、作业要求：看懂书上的例子。 五、教学参考资料：Visual FoxPro程序设计第6章 六、教学小结：
