VB的LISTBOX的LIST属性怎么进行选择排序和冒泡排序

Posted 2023-04-14

VB的LISTBOXD的LIST属性怎么进行选择排序和冒泡排序

参考技术A 老板用双for循环直接做，属性改listbox1.item(i)
(忘记是listitem，还是就是item了，你自己查一下，提示里有)
新版2008，可以直接通过
控件
属性面板
设置允许排序功能，
然后点标题头就自动排好了

vb中ListBox怎么加左右滚动条ScrollBar

参考如下：
Private
Sub
Form_Load()
Dim
Information#,
Scrollbar#
For
Information
=
1
To
88
List1.AddItem
_
"横滚动条示范"
&
_
"横滚动条示范"
&
_
"横滚动条示范"
Next
Information
Information
=
SendMessageLong(List1.hwnd,
LB_SETHORIZONTALEXTENT,
2000,
0)
'2000:控制横滚动条的范围(建议值2000-3000)
Scrollbar
=
GetWindowLong(List1.hwnd,
GWL_STYLE)
Scrollbar
=
Scrollbar
Or
WS_HSCROLL
SetWindowLong
List1.hwnd,
GWL_STYLE,
Scrollbar
SetWindowPos
List1.hwnd,
_
0,
0,
0,
0,
0,
_
SWP_NOMOVE
Or
SWP_NOOWNERZORDER
Or
SWP_NOSIZE
Or
SWP_FRAMECHANGED
End
Sub 参考技术A listbox的滚动条是自动的，无需用户干预。