Ho buttato giù un po' di codice, spero sia ciò che ti serve.
Ho una treeview e un commandbutton sul form; carico la treeview al click del button:
codice:
Private Sub Command2_Click()
    'Nodo 1
    TreeView.Nodes.Add Key:="a", Text:="Primo nodo"

    'Sottonodi figli di Nodo 1
    TreeView.Nodes.Add Relative:="a", Relationship:=tvwChild, _
                       Key:="uno", Text:="uno"
    TreeView.Nodes.Add Relative:="a", Relationship:=tvwChild, _
                       Key:="due", Text:="due"
    TreeView.Nodes.Add Relative:="a", Relationship:=tvwChild, _
                       Key:="tre", Text:="tre"

    'Nodo 2
    TreeView.Nodes.Add Key:="b", Text:="Secondo nodo"

    'Sottonodi figli di Nodo 2
    TreeView.Nodes.Add Relative:="b", Relationship:=tvwChild, _
                       Key:="quattro", Text:="quattro"
    TreeView.Nodes.Add Relative:="b", Relationship:=tvwChild, _
                       Key:="cinque", Text:="cinque"
    TreeView.Nodes.Add Relative:="b", Relationship:=tvwChild, _
                       Key:="sei", Text:="sei"
    
    'Seleziona il sottonodo identificato dalla key "due"
    TreeView.Nodes("due").Selected = True
    TreeView.SetFocus

End Sub