如何确定treeview的父亲结点

Question

现在有一个有三级目录的树结构
A--
|   |__a1__
|        |__a2
|
B--
   |__b1__
         |__b2
现在想实现这样一个功能，点击某个结点后能找到他的父亲结点和祖父结点

Answer 1

Private Sub Form_Load()
    Dim I As Integer
    TreeView1.Checkboxes = True
    TreeView1.Nodes.Add , "R", "root", "root"
    TreeView1.Nodes.Add "root", tvwChild, "key1", "aa"
    TreeView1.Nodes.Add "key1", tvwChild, "key11", "ccc"    TreeView1.Nodes.Add "root", tvwChild, "key2", "bb"
    TreeView1.Nodes.Add "key2", tvwChild, "key21", "ddd"
    TreeView1.Nodes.Add "key2", tvwChild, "key211", "eee"
    
    TreeView1.Nodes.Add "key211", tvwChild, "key311", "fff"
    
    TreeView1.Nodes.Add "key311", tvwChild, "key411", "ggg"
    
    For I = 1 To TreeView1.Nodes.Count
        TreeView1.Nodes(I).Expanded = True
    Next
End SubPrivate Sub TreeView1_NodeClick(ByVal Node As MSComctlLib.Node)
Dim NodeA As Node
Set NodeA = Node.Parent
    MsgBox Node.Parent
    MsgBox NodeA.Parent
End Sub