Home
Up
Count
Item
Add
Remove
Replace
Sort
Move
MoveUp
MoveDown
OnBarRecordAdded
OnBarRecordChanged
OnBarRecordRemoved
OnBarRecordsSorted
OnBarRecordMoved

BarRecordCollection.Item

Gets a bar record from the collection.

Syntax

barrecord = group.Bars(index)
barrecord = group.Bars.Item(index)

Parameters

index

Index of the bar record.  The index can be a 1-based index or the name of the bar record

Returns

Object. Returns the specified bar record or Nothing if the bar record doesn't exist

Example

This example gets the 4th bar record of the collection and displays its mark number if it exists

Dim barrecord as BarRecord
barrecord = group.Bars(4)
If group Is Nothing Then
   MsgBox "Bar Record 4 doesn't exist"
Else
   MsgBox "Bar Record 4 is named " + barrecord.Mark
End If

 

Copyright © 1999, Washington State Department of Transportation