双击TreeView，ListView显示问题！！！

wo8352490123 2009-08-25 04:58:45

我在一个窗体上，左边是TreeView控件，右边是ListView控件，左边我已经从数据库动态生成了树形目录，如何编写代码：通过双击左边的树形目录根节点，使它的子节点的内容在ListView上显示？ListView也是有层次的，与TreeView一致！先谢谢了！

...全文

348 12 打赏收藏转发到动态举报

写回复

用AI写文章

12 条回复

切换为时间正序

请发表友善的回复…

发表回复

gba8jing 2009-08-26

打赏
举报

[Quote=引用 10 楼 dancingbit 的回复:]
ListView本身无所谓分层的，要分层的话，分在你心中。
左边的TreeView被点击之后，取相应节点，分析应该在ListView中展现的视图，清空现在项，添加新项。
[/Quote]

看到这么一说很有理，Treeview 本身就是一个可展开和收缩的分层结构，所有的分层功能都能在 Treeview 里完成，为什么非要在 Listview 里完成不可，感觉好像是有了牛还非要拿驴去犁田的感觉。

aa345731309 2009-08-26

打赏
举报

虽然完全看不懂,为了分我顶贴

dancingbit 2009-08-25

打赏
举报

ListView本身无所谓分层的，要分层的话，分在你心中。
左边的TreeView被点击之后，取相应节点，分析应该在ListView中展现的视图，清空现在项，添加新项。

gba8jing 2009-08-25

打赏
举报

有专门获取子节点数据的方法仔细到 MSDN 去找找，我没用过所以也不记得是什么方法来着。

xunis 2009-08-25

打赏
举报

不用这么麻烦了把对于每个几点用模糊查询
比如主节点A B ，A1,A2,A3是A的子节点，B1,B2,B3是B的子节点
A主节点的查询条件就是 strSQL = "SELECT * FROM VWEmployees WHERE DepID like '%" & trvData.SelectedNode.Name & "%' order by EmpID"

查出来的就是只要带A的全部因为你说过你的节点的名字就是 A B A1A2A3 B1B2B3

所以查A 就查出了带A的全部资料查A1的话他的name是A1 模糊查询除了带A1的所有资料如果说A1还有次节点 A11 A12 A13 A14 那么这些资料也会查出来那考虑的太复杂了吧

wo8352490123 2009-08-25

打赏
举报

关键是两种功能都要用啊

Forrest23 2009-08-25

打赏
举报

ListView好像不能有这种层次的,你不要用ListView,再用一个TreeView就可以了啊

wo8352490123 2009-08-25

打赏
举报

比如主节点A B ，A1,A2,A3是A的子节点，B1,B2,B3是B的子节点，在ListView上显示A和B,双击A以后，显示A1,A2,A3，是这个意思！

xunis 2009-08-25

打赏
举报

ListView 上是数据吧？进入下一层？比如主节点A B 其余 A1 B1 A11 B11 A11C A11D B11C B11D 你的意思是选择 A节点的资料双击然后ListView显示 A的下一层的资料？还是不懂你的意思

wo8352490123 2009-08-25

打赏
举报

我没说清楚，补充下，就是在ListView上选中一个，双击下，能进入下一层

xunis 2009-08-25

打赏
举报

 '加载行

  Me.lsvProjects.Items.Add(lstItem)

 '就是这句代码啊

 '就加载到ListView了 你说的层是什么意思？

 '点击listview 控件的最右上角有个小黑三角 点击三角编辑列 把你要在控件上方显示的字段写进去 name 和text

在配合下面的代码应该没问题了吧？

  ''' 树形菜单查询

    ''' </summary>

    ''' <param name="sender"></param>

    ''' <param name="e"></param>

    ''' <remarks></remarks>

    Private Sub trvData_AfterSelect(ByVal sender As System.Object, ByVal e As System.Windows.Forms.TreeViewEventArgs) Handles trvData.AfterSelect

        '清空输入区

        btnClear_Click(sender, e)

        Dim tNode As New TreeNode

        Dim sNode As New TreeNode

        Dim strSQL As String = ""

        '校驗密碼和用戶名的SQL語句

        Try

            strSQL = "SELECT * FROM VWEmployees WHERE DepID like '%" & trvData.SelectedNode.Name & "%' order by EmpID"

            Dim ds As DataSet = GetDataSet(strSQL)

            If ds.Tables.Item(0).Rows.Count = 0 Then

                MessageBox.Show("资料不存在")

            Else

                '显示数据

                Me.dgvShowData.DataSource = ds.Tables.Item(0).DefaultView

                '中文标题

                chineseTitle()

            End If

        Catch ex As Exception

            MessageBox.Show("GetEmployee出错！")

        End Try

    End Sub