Article ID: 143405
Article Last Modified on 11/18/2003
Private Sub Form_Load()
Dim nodX As Node
Set nodX = TreeView1.Nodes.Add(, , "Root", "Root")
Set nodX = TreeView1.Nodes.Add("Root", 4, "Node1", "Node1")
Set nodX = TreeView1.Nodes.Add("Node1", 4, "Node2", "Node2")
Set nodX = TreeView1.Nodes.Add("Node2", 4, "Node3", "Node3")
End Sub
Debug.Print "TreeView Keydown "; KeyCode
Debug.Print "Form Keydown "; KeyCode
Keywords: kb32bitonly kbprb kbcode KB143405