Home
Up
BarData
BendType
Epoxy
Location
LumpSum
Mark
Mass
NumEach
NumReqd
PrimaryBend
Size
Status
StatusMessages
Substructure
Use
Varies
VariesBend
OnBarRecordChanged

BarRecord.OnBarRecordChanged

Fires when the bar record changes

Syntax

handler_OnBarRecordChanged()

Parameters

None

Returns

None

Example

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

Dim With Events barrecord As BarRecord
Set barrecord = New BarRecord
...
Private Sub barrecord_OnBarRecordChanged()
   MsgBox "The Bar Record changed"
End Sub

Copyright © 1999, Washington State Department of Transportation