Help and Support
 

powered byLive Search

ADT/ODE: How to Remove All Nodes from TreeView Control

Retired KB ArticleThis article was written about products for which Microsoft no longer offers support. Therefore, this article is offered "as is" and will no longer be updated.
View products that this article applies to.
Article ID:172286
Last Review:January 20, 2007
Revision:3.1
This article was previously published under Q172286
Advanced: Requires expert coding, interoperability, and multiuser skills.

SUMMARY

The Microsoft TreeView control version 5.0 ships with Microsoft Office 97 Developer Edition.

Use the Clear method to remove all nodes in a TreeView control.

This article assumes that you are familiar with Visual Basic for Applications and with creating Microsoft Access applications using the programming tools provided with Microsoft Access. For more information about Visual Basic for Applications, please refer to the "Building Applications with Microsoft Access 97" manual.

Back to the top

MORE INFORMATION

The following example demonstrates creating a TreeView control, adding nodes, and then removing the nodes:
1.Start Microsoft Access and open a new, blank database.
2.Open a new form in Design view.
3.On the Insert menu, click ActiveX Control (or click Custom Control if you are using Microsoft Access 7.0).
4.In the Insert ActiveX Control dialog box, select the Microsoft TreeView Control, and then click OK.
5.Set the following properties of the TreeView Control: 
        TreeView Control
        ----------------
        Name: tvcExample
        Width: 2
        Height: 2
6.Add a command button to the form, and set the following properties: 
        Command Button
        ----------------------
        Name: btnFillTreeView
        Caption: Fill TreeView
        Width: 1"
        Height: .25"
7.Set the OnClick property of the command button to the following event procedure: 
       Private Sub btnFillTreeView_Click()

          Dim nodX As Node    ' Declare Node variable.

          With Me!tvcExample

            ' Set Treeview control properties.
            .LineStyle = tvwRootLines  ' Linestyle 1
            ' Add Node objects
            ' First node with 'Root1' as text.
            Set nodX = .Nodes.Add(, , "r1", "Root1")
            ' Second node on root with 'Root2' as text
            Set nodX = .Nodes.Add(, , "r2", "Root2")
            ' This next node is a child of Node 1 ("Root").
            Set nodX = .Nodes.Add("r1", tvwChild, "child1", "Child")

          End With

       End Sub
8.Add another command button to the form and set the following properties: 
        Command Button
        -----------------------
        Name: btnDeleteAllNodes
        Caption: Clear TreeView
        Width: .25"
        Height: 1"
9.Set the OnClick property of the command button to the following event procedure: 
        Private Sub btnDeleteAllNodes_Click()
           Me!tvcExample.Nodes.Clear
        End Sub
10.Switch to Form view and click Fill TreeView; then click Clear Treeview, and note that all nodes are removed.

Back to the top

REFERENCES

For more information about nodes in the TreeView control, search the Help Index for "node object."

Back to the top

APPLIES TO
•Microsoft Access 95 Standard Edition
•Microsoft Access 97 Standard Edition
•Microsoft Office 97 Developer Edition
•Microsoft Access Developer's Toolkit 1.1

Back to the top

Keywords: 
kbhowto kbprogramming KB172286

Back to the top

Article Translations

 

Other Support Options

  • Need More Help?
    Contact a Support professional by E-mail, Online or Phone.
  • Customer Service
    For non-technical assistance with product purchases, subscriptions, online services, events, training courses, corporate sales, piracy issues, and more.
  • Newsgroups
    Pose a question to other users. Discussion groups and Forums about specific Microsoft products, technologies, and services.