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.Company

Set/Get the company property.

Syntax

co = barlist.Company
barlist.Company = co

Parameters

None

Returns

String. The current value of the company property.

Example

This example gets the current value of the company and displays it

Dim co as String
co = barlist.Company
MsgBox "This barlist prepared by engineers at " + co

 

Copyright © 1999, Washington State Department of Transportation