菜鸟请教各位大哥VB 中treeview控件如何实现这种效果？谢谢

Question

我想实现的，效果就是单击treeview控件的某个子节点调用另一个窗体，刚学VB基础很差，请各位大哥把代码搞简单点儿我学习下，谢谢

Answer 1

Private Sub Form_Load()
Dim myNod As Node
Set myNod = TreeView1.Nodes.Add(, tvwChild, "richeng", "日程安排")
Set myNod = TreeView1.Nodes.Add("richeng", tvwChild, "zao", "早")
Set myNod = TreeView1.Nodes.Add("richeng", tvwChild, "wan", "晚")
End Sub 
-----------------------------------------------
我想实现的效果就是单击 早这个节点 调用窗体A
               单击 晚这个窗体调用窗体B

Answer 2

Private Sub TreeView1_NodeClick(ByVal Node As MSComctlLib.Node)
      Dim nodX As Node
      Set nodX = Form1.TreeView1.SelectedItem
    If nodX.Text = "功能管理" Then '树节点名称
      Form2.show      
    End If   
End Sub这样就个就是你需要的了。