ISLibrary.Item

Description

Each of the libraries within the collection.

Syntax

object.Item(aIndex)

Part	Attribute	Type	Description
`object`	Required	ISLibrary	The `object` always implements the ISLibrary interface
`aIndex`	In, Required	int	The index of the library

Restriction: This property is readonly.

Return Value

object

Example

Display the tree of the libraries.

sub main
  Dim aLibrary
  Dim aMessage
    
  set aLibrary = Profile.LoadRootLibrary
  aMessage = GetLibraryInfo(aLibrary, 0) 
  Profile.MsgBox (aMessage)    
end sub
     
function GetLibraryInfo(aLibrary, aLevel)
  Dim aInfo
  Dim i 
   
  aInfo = Space(4 * aLevel) & aLibrary.Name &_
    " (Children: " & aLibrary.Count & ")" & vbNewLine          
     
  for i = 0 to aLibrary.Count - 1
    aInfo = aInfo & GetLibraryInfo(aLibrary.SubLibrary(i), aLevel + 1)  
  next
  
  GetLibraryInfo = aInfo
  
end function

Note:

In Profile Client v8 on User Interface Library can be found in Maintain > Library.

Version information

Added in v7.8.0