请问如何将vb的listbox的列宽设置成可随意拖动调整大小的

Question

listbox有这个属性吗？？？？感谢各位大虾有分散。
哥，你懂的

Answer 1

加上WS_THICKFRAME风格，比如：Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Const GWL_STYLE = (-16)
Private Const WS_THICKFRAME = &H40000Private Sub Form_Load()
    Me.List1.AddItem "1111"
    Me.List1.AddItem "2222"
    SetWindowLong Me.List1.hwnd, GWL_STYLE, GetWindowLong(Me.List1.hwnd, GWL_STYLE) Or WS_THICKFRAME
End Sub

Answer 2

请问listview组件如何设置属性，listview默认好像也不能拖动？？

Answer 3

3楼的方法试了一下。。
提示：编译错误，方法和数据成员未找到应该是hwnd这里有问题SetWindowLong Me.List65.hwnd

Answer 4

郁闷，我的access2007 怎么没有listview控件。。

Answer 5

点了，没有任何反应，active 里面貌似有些控件，不过没有看见listview

Answer 6

找到了。靠，我装的access2007没有那个控件，03的貌似有。