Private Sub TreeView1_NodeMouseDoubleClick(ByVal sender As Object, ByVal e As System.Windows.Forms.TreeNodeMouseClickEventArgs) Handles TreeView1.NodeMouseDoubleClick
'自定义的数据查询方法返回一个DataTable
'e.Node.Name是对应的节点名称,也就是你要传的参数
Dim TreeTable As DataTable =FindData(e.Node.Name)
If TreeTable IsNot Nothing Then
Dim TreeRow As DataRow
Dim litem As ListViewItem
'LsView你定义的ListView控件
LsView.Items.Clear()
'循环添加你要的数据节点
For Each TreeRow In TreeTable.Rows
litem = New ListViewItem("items" & TreeRow("字段x").ToString & "_" & _
TreeRow("字段y").ToString, 1)
'至于你要显示图标就更简单了,直接在窗体上拉一个ImageList控件添加几个图标
'然后在上面的listviewitem构造函数中最后面一个整形参数修改对应的图标就成了
'不过你要先把ListView的LargeImageList或StateImageList和imagelist关联
LsView.Items.Add(litem)
End If
Next
Else
MsgBox("没有任何数据", MsgBoxStyle.Information + MsgBoxStyle.OkOnly, "消息")
End If
End Sub