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

BarRecordCollection.OnBarRecordsSorted

Fires when the bar records are sorted

Syntax

handler_OnBarRecordsSorted()

Parameters

None

Returns

None

Example

In this example, a message is displayed when bar records are sorted.

Dim With Events bars as BarRecordCollection
Set bars = group.Bars
...
Private Sub bars_OnBarRecordsSorted()
   MsgBox "The bar records were sorted"
End Sub

Copyright © 1999, Washington State Department of Transportation