Gets and sets the identifier for the measurement unit. | |
Syntax: | String =
object.UnitID object.UnitID = String |
Description: | The UnitID property gets and sets the
identifier of the measurement unit. Example: Dim project As CimProject Set project = CreateObject("CimProject") project.OpenLocalProject "d:\classes\classes.gef" Dim measurementManager As CimMeasurementManager Dim measurementUnitList As CimMeasurementUnitList Dim measurementUnit As CimMeasurementUnit Set measurementManager =
project.MeasurementManager Set measurementUnitList = measurementManager.Units Set measurementUnit =
measurementUnitList.Item("METER") MsgBox measurementUnit.UnitID |