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

BarRecordCollection.OnBarRecordRemoved

Fires when a bar record is removed from the collection

Syntax

handler_OnBarRecordRemoved(mark)

Parameters

mark

Mark number of the bar record that was removed

Returns

None

Example

In this example, a message is displayed when a bar record is removed from the collection

Dim With Events bars as BarRecordCollection
Set bars = group.Bars
...
Private Sub bars_OnBarRecordRemoved(ByVal mark as String)
   MsgBox "Mark " + mark + " was removed"
End Sub

Copyright © 1999, Washington State Department of Transportation