Question

vb treeview控件节点点击事件

Dim nodex As Node
Private Sub treeview_add()
TreeView1.Nodes.Clear
TreeView1.Nodes.Add , , "root", "商品分类"
Reco.Open "select * from 商品分类", Conn, adOpenKeyset, adLockPessimistic
Do Until Reco.EOF
skey = Reco.Fields("商品分类")
Set nodex = TreeView1.Nodes.Add("root", tvwChild, skey, Reco.Fields("商品分类"))
Reco.MoveNext
Loop
Reco.Close End Sub
Private Sub Form_Load() Conn.Open "dsn=denglu;uid=;pwd="
treeview_add
End Sub

用上面这段代码我把treeview的节点弄好了，但是怎么实现 我点击节点名称，就显示数据表里面相关分类的数据呢？是不是用listview显示？

Answer 1

Private Sub TreeView1_NodeClick(ByVal Node As MSComctlLib.Node)
Label1.Caption = Node.Key
Label2.Caption = Node.Text

......
在数据库中查询相关信息展示到相应的控件中
......
End Sub

在TreeView的NodeClick事件中实现

Answer 2

treeview+listview是经典的组合模式