vb编程技巧.pdf

VB 技巧 - 列表框使用技巧 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)等也是适用的，赶快拿去试一试吧。 VB 技巧 - 工具栏使用技巧 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_S