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

BarRecord.Epoxy

Set/Get the Epoxy property

Syntax

bEpoxy = barrecord.Epoxy
barrecord.Epoxy = bEpoxy

Parameters

None

Returns

Boolean.  Returns the current value of the Epoxy property

Example

This example accesses the epoxy property and displays it current value

Dim bEpoxy as Boolean
bEpoxy = barrecord.Epoxy
If bEpoxy = True Then
   MsgBox "Bars are epoxy coated"
Else
   MsgBox "Bars are not epoxy coated"
End If

 

Copyright © 1999, Washington State Department of Transportation