ISReferenceSeriesCollection.Item

Description

Each of the reference series within the collection.

Syntax

object.Item(aIndex)

Part Attribute Type Description
object Required
The object always implements the ISReferenceSeriesCollection interface
aIndex In, Required
int
The index of the reference series
Restriction: This property is readonly.

Return Value

ISReferenceSeries

Example

Display the number of reference series and some information about them.

Dim aReferenceSeriesCollection
Dim aReferenceSeries
Dim aMessage
Dim i   

Set aReferenceSeriesCollection = Profile.GetReferenceSeriesCollection

aMessage = "Reference Series Count = " & aReferenceSeriesCollection.Count & vbNewLine

for i = 0 to aReferenceSeriesCollection.Count - 1
  set aReferenceSeries = aReferenceSeriesCollection.Item (i)
  aMessage = aMessage & vbNewLine & (i + 1) & ". " &_
    "Series Name: " & aReferenceSeries.SeriesName & vbNewLine &_
    "-Comment: " & aReferenceSeries.Comment & vbNewLine &_
    "-ID: " & aReferenceSeries.ID & vbNewLine &_   
    "-Is Range: " & aReferenceSeries.IsRange & vbNewLine  
next  

Profile.MsgBox(aMessage)   
Note:

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

Version information

Added in v7.8.0