怎么用代码在,TreeView这个控件中添加,父项单,及子项呀???谢谢

解决方案 »

  1.   

    nodes.add
    好基础的东西,还是看看书吧
      

  2.   

    晕了,看msdn啊大哥!
    Private Sub Form_Load()
        Dim nodX As Node
        Set nodX = TreeView1.Nodes.Add(, , "R", "Root")
        Set nodX = TreeView1.Nodes.Add("R", tvwChild, "C1", "Child 1")
        Set nodX = TreeView1.Nodes.Add("C1", tvwChild, "C2", "Child 2")
        nodX.EnsureVisible
        Set nodX = TreeView1.Nodes.Add("C2", tvwChild, "C3", "Child 3")
        nodX.EnsureVisible
        Set nodX = TreeView1.Nodes.Add("R", tvwChild, "C4", "Child 4")
        nodX.EnsureVisible
        Set nodX = TreeView1.Nodes.Add("R", tvwChild, "C5", "Child 1")
        nodX.EnsureVisible
    end sub