CimMeasurementUnit.UnitID (property)

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