Add (OlapTreeNodes)

The Add method of the OlapTreeNodes collection adds a new OlapTreeNode object to the collection. This method returns an object of type OlapTreeNode.

Syntax

Set vnt = object.Add(Caption As String, IconClosed As Integer, [IconOpen As Integer])

vnt

An instance of OlapTreeNode that receives the instance of the new member.

object

An instance of the OlapTreeNodes collection.

Caption

The string value to be displayed for the tree node.

IconClosed

The index of the icon resource displayed when the tree node is collapsed.

IconOpen

(Optional)The index of the icon resource displayed when the tree node is expanded.

Remarks

The Add method is used to populate the OlapTreeNodes collection with child nodes that are displayed in the tree. Call this method for each OlapTreeNode object you want to add.

Example

Private Enum NodeIcons
  icoNode1 = 1
  icoNode2
  icoNode3
End Enum

Private Sub IOlapAddIn_ProvideChildNodes( _
    ParentNode As DSSAddInsManager. OlapTreeNode, _
    OlapTreeNodes As DSSAddInsManager.OlapTreeNodes)
  On Error GoTo ProvideChildNodes_Err 'Handle errors
  
  If ParentNode.Caption = "Analysis Servers" Then
    OlapTreeNodes.Add "Node 1", icoNode1
    OlapTreeNodes.Add "Node 2", icoNode2
    OlapTreeNodes.Add "Node 3", icoNode3
  End If
  
  Exit Sub
ProvideChildNodes_Err:
  Debug.Print Err.Number, Err.Description, Err.Source
  Debug.Assert False
  MsgBox "ProvideChildNodes Failed"
  Err.Clear
End Sub