Home
Up
BarRecords
Name
Status
SuperstructureMass
SuperstructureMassEpoxy
SubstructureMass
SubstructureMassEpoxy
OnBarRecordAdded
OnBarRecordChanged
OnBarRecrodRemoved
OnBarRecordsSorted
OnBarRecordMoved
OnGroupChanged

Group.OnGroupChanged

Fires when a group is changed.

Syntax

handler_OnGroupChanged()

Parameters

None

Returns

None

Example

In this example, a message is displayed when a group changes

Dim With Events group as Group
Set group = barlist.Groups(1)
...
Private Sub group_OnGroupChanged()
   MsgBox "Group changed"
End Sub

 

Copyright © 1999, Washington State Department of Transportation