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

BarRecordCollection.OnBarRecordChanged

Fires when a bar record in this collection has changed

Syntax

handler_OnBarRecordChanged(record)

Parameters

newrecord

The bar record that changed

Returns

None

Example

In this example, a message is displayed when a bar record is changed

Dim With Events bars As BarRecordCollection
Set bars = group.Bars
...
Private Sub bars_OnBarRecordChanged(ByVal record as BarRecord)
   MsgBox "Mark " + record.Mark + " has changed"
End Sub

Copyright © 1999, Washington State Department of Transportation