【分享成果，随喜正能量】人生是需要等候的，等候一阵风的拂过，等候一朵花的盛开，等候伊人的到来，等候生命爆发的强音。心灵是需要在等候中坚守的，坚守无风的日月，坚守落花的寂寞，坚守情感的空白，坚守生活的平凡。懂得等候与坚守，我们才能从容不迫，最终能够沐浴清风，笑看花开，情有所属，人生无悔。
《VBA之Excel应用》是非常经典的，是我推出的第七套教程，定位于初级。这套教程从简单的录制宏开始讲解，一直到窗体的搭建，内容丰富，实例众多。大家可以非常容易的掌握相关的知识，这套教程共三册，十七章，都是我们在利用EXCEL工作过程中需要掌握的知识点，希望大家能掌握利用。今日讲解的内容是“VBA之EXCEL应用”的第十五章“ActiveX控件（ActiveX Controls）”的第4节：列表框（List Box）之应用实例
第四节 列表框（List Box）之一
大家好，我们这讲开始列表框的学习。这个控件显示一个值列表，并允许用户选择其中的一个或多个值。可以说这个控件无论是VBA还是VB都是一个非常重要的控件。用这个控件显示值或者选择多个值都是非常方便的操作。
1 Listbox控件的工作表添加
为了在工作表窗口添加列表框控件，我们在工作表窗口“开发工具”中，单击“插入”。在弹出的控件列表中选择“列表框”。
然后，在工作表上拖动，这时就在工作表上出现了列表框，如下：
2 列表框的自定义的修改
我们可以通过右键单击控件(确保选择了设计模式)，然后单击属性来更改控件的名称。这里，我们保留ListBox1作为列表框的名称。如下面图：
这种修正方法类似于之前text文本框的属性修改。在接下来的讲解中，我会给大家讲解一下这个控件的属性和方法。其中一些属性和方法是各个控件所通用的。
3 列表框的常用属性
1）BackColor 属性：设定Listbox的背景色。可采用任意整数来表示某一种有效的颜色，也可采用由红、绿、蓝三种成分构成的RGB 函数来指定颜色，每一种色素的值是0 至255 之间的任意整数。
2）BorderColor 属性：指定Listbox的边框颜色。
3）BorderStyle 属性：指定Listbox边框类型。其值可为fmBorderStyleNone ：控件无可见的边框线（默认值）和fmBorderStyleSingle：控件有一单线的边框。BorderStyle 用 BorderColor 来定义其边框的颜色。
4）ColumnCount 属性：指定Listbox的显示列数。
5）ColumnWidths 属性：指定多列的Listbox中的各列的宽度。以磅为单位，设为 0 时则隐藏该列。ColumnWidths接受一个字符串参数，假如Listbox控件有3列，可这样设置：ListBox1.ColumnWidths = "80;90;100"。
6）ColumnHeads 属性：设置是否显示Listbox列标题，布尔值。只有设置RowSource时，才可以显示标题。通过AddItem、List或Column赋值的Listbox无法显示标题。
7）Enabled 属性：指定一个控件能否接受焦点和响应用户产生的事件。
8）Font 对象：定义控件所用文字的特征，包括字体，字号大小，斜体，下划线等。
9）ForeColor 属性：指定控件的前景色，即文字的颜色。
10）Height、Width 属性：设置或返回控件的高度和宽度，以磅为单位。
11）Left、Top 属性：控件与所在容器的左边或顶边之间的距离。
12）ListStyle 属性：规定列表框列表的外观。可选值有两个：fmListStylePlain 和fmListStyleOption。fmListStyleOption显示选项按钮，形状跟MultiSelect属性有关。当Listbox可以多选时，选项按钮为方形□，否则为圆形○。
13）MultiSelect 属性：设置Listbox控件是否允许多项选择。可选值为：
fmMultiSelectSingle 只可选择一个条目（默认）。fmMultiSelectMulti 按空格键或单击鼠标以选定列表中条目或取消选定。fmMultiSelectExtended 按Shift并单击鼠标，或按Shift的同时按一个方向键，将所选条目由前一项扩展到当前项。按Ctrl的同时单击鼠标可选定或取消选定。
14）TextAlign 属性：定义控件中文本的对齐方式。其值可为：fmTextAlignLeft 将所显示文本的第一个字符与控件显示或编辑区的左边界对齐（默认值）。fmTextAlignCenter 在控件的显示或编辑区中，使文本中央对齐。fmTextAlignRight 将所显示文本的最后一个字符与控件显示或编辑区的右边界对齐。
15）TopIndex 属性：设置和返回出现在表格最顶端位置的项目。出现在顶端位置的表项的编号默认值是 0（或表中第一个项目）。如果表是空的或未被显示，返回值为 -1。
16）Visible 属性：定义一个对象是可视的还是被隐藏的。
大家要注意上述属性有许多是在各个控件中是通用的，如BackColor 属性、BorderColor 属性、Enabled 属性、Font 对象、TextAlign 属性、Left、Top 属性等等
今日内容回向：
1） 如何在工作表上添加列表框？
2） 列表框控件的属性有哪些？
本讲内容参考程序文件：工作簿15.xlsm
分享成果，随喜正能量