|
Home
Up
Groups
TrafficBarrierQuantity
BridgeGrateInletQuantity
RetainingWallQuantity
SuperstructureMass
SuperstructureMassEpoxy
SubstructureMass
SubstructureMassEpoxy
Status
Project
JobNumber
Engineer
Company
Comments
OnBarRecordAdded
OnBarRecordChanged
OnBarRecordRemoved
OnBarRecordsSorted
OnBarRecordMoved
OnGroupAdded
OnGroupChanged
OnGroupRemoved
OnGroupMoved
OnNotIncludedQuantitiesChanged
| |
Barlist.OnBarRecordChanged
Fires when a bar record in this barlist has changed
Syntax
handler_OnBarRecordChanged(group,record)
Parameters
group
Group that the barlist record is a member of
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 barlist as Barlist
Set barlist = new Barlist
...
Private Sub barlist_OnBarRecordChanged(ByVal group as Group, ByVal record as
BarRecord)
MsgBox "Mark " + record.Mark + " in Group " +
group.Name + " has changed"
End Sub
|