一　列表框使用技巧

　1、排列列表框中的列表项

　　在设计或运行时，都可以通过将列表框的SORTED属性设置为TRUE（默认为FALSE）来对列表框的各项按字母顺序进行排列。

　　2、怎样返回被选中的列表项的文本

　　可以使用list.text属性 或 list.list(list.listindex)来得到列表项。

　　3、使用多选列表框

　　多选列表框允许用户一次选择多个列表项。通过对MULTISELECT属性的设置，就可以把一个列表框变成多选列表框。用户可以用SHIFT和CTRL键选择多个列表框。下面是设置它时可能用到的值：

　　0--不允许进行多选（默认）

　　1--简单的多选，单击鼠标或空格键可在列表框中选中一项或取消选择

　　2--扩展的多选。按下SHIFT键并单击鼠标或按下SHIFT键和一个箭头键

　　也许你会说，我已经把上面的MULTISELECT属性设置好了，而且也能够在列表框中实现多选，但是怎么才能返回选中的条目呢？是这样的，我们可以使用一个循环来找到被选中的项： 循环中利用了SELECTED属性：

　　　Dim intloopindex as integer 　　　　　　　　　'intloopindex为循环变量
　　　for intloopindex =0 to list.listcount-1 　　　'list.listcount-1是列表框中最大的列表项序号
　　　　　if list.selected(intloopindex) then 　　　'selected属性为列表项的选中状态，为布尔型
　　　　　　　list2.additem list.list(intloopindex) '将选中的列表项添加到另外一个列表框中
　　　　　end if 　　　　　　　　　　　　　　　　　 '我们可根据自己需要写这段代码
　　　next intloopindex

　　4、使列表框具有水平滚动条：只须用COLUMNS属性将列表框划分为多列即可，默认情况下属性的值为0，不允许多列；设置为其他值时，列表框就会将他的列表项显示为多列，而我们对每一项的操作方法不变。

　　5、在列表框中使用复选框：可通过设置STYLE属性，将一个列表框变成使用复选框的列表框，下面是设置STYLE属性时所用的值： 0--标准列表框（默认） 1--带有复选框的列表框

　　6、清空列表框 LIST.CLEAR

　　其实上面的这些技巧对于和列表框类似的控件例如：文件列表框(FileListBox)、文件夹列表框(DirListBox)等也是适用的，赶快拿去试一试吧。

　　二　工具栏使用技巧

　1、在工具栏中添加复选（切换）按钮

　　工具栏中的复选按钮是指当按钮被按下以后就保持被按下的状态，只有下次再按才会弹起来，这就是工具栏的复选切换状态。要实现这样的效果，必须将它的STYLE属性设为tbrCheck，这个设置可以在工具栏的属性页中完成。方法是右击工具栏并选择Properties选项以打开属性页，单击属性页的Buttons选项卡，选择要用的按钮，将它的形式STYLE设为tbrCheck即可。

　　2、在工具栏中添加组合框和其他控件

　　 通过将按钮的STYLE属性设为tbrPlaceholder在工具栏中设置空间，可以将组合框和其他控件添加到工具栏中，我们以组合框为例来看看具体步骤：

　　1）右击工具栏并选择Properties选项打开属性页，单击属性页的Buttons选项卡；

　　2）在要添加组合框的地方添加一个新的按钮；

　　3）把新按钮的STYLE属性设为tbrPlaceholder，这样按钮不会显现出来，而只是一片空白，用来设置组合框；

　　4）在width框中输入一个值，这是预留给组合框的空间的宽度；

　　5）点击确定后，在工具栏的空白处新画一个组合框，注意一定要新画；

　　6）其他操作与原来相同。

　　3、怎样做出象IE一样的平面工具栏

　　IE、WORD等流行软件的工具栏在通常状态下是平面的，只有当鼠标移过时才会突起，这样的效果通过VB工具栏本身是无法实现的，虽然可以用贴图的方法来模拟这种效果但却十分麻烦，简便的方法是通过调用WIN32 API函数来实现。其思路是用SendMessage函数向工具栏发送设置显示样式TB_SETSTYLE的消息来改变工具栏的显示效果。具体的实现请参看“