BarRecord.Varies
Returns the Varies property
Syntax
bVaries =
barrecord.Varies
Parameters
None
Returns
Boolean. Returns True if this bar record has a varies
bend
Example
This example reports the varies status of a bar record
Dim bVaries As
Boolean
bVaries = barrecord.Varies
If bVaries = True Then
MsgBox "This bar record has a varies bend"
Else
MsgBox "This bar record does not have a varies bend"
End If
|