有个小问题：如何可以在treeview和listvuew之间加个分隔条，可以自由拉动？

Question

可以啊。中间加个ImageBox什么的，在其MouseMove事件中写代码。

Answer 1

'        Tip:其实很多问题在以前的贴子里都有过很好的解答,我建议大家提问前先搜一下以前的贴子,会节约很多时间的.
'
'     Author:吴文智
'       Date:2001-11-27
'Description:要试用本例请在窗体中填加一个ListView和一个TreeView及一个PictureBox
'            然后在代码窗体中粘贴如下代码
'            Good luck!Option ExplicitPrivate Sub picture1_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)
    Dim lngRange As Long
    
    If Button = vbLeftButton Then
        lngRange = Picture1.Left + x
        
        If lngRange < 600 Then lngRange = 600
        If lngRange > Me.Width - 600 Then lngRange = Me.Width - 600
        
        Picture1.Left = lngRange
        TreeView1.Width = lngRange
        ListView1.Width = Me.Width - TreeView1.Width - Picture1.Width
        ListView1.Left = lngRange + Picture1.Width
    End If
End Sub

Answer 2

网点:http://sanjianxia.myrice.com上有相关分割条的文章!