CimMeasurementUnitList.Item (read-only property)

Gets the a measurement unit by name.

Syntax:

Set CimMeasurementUnit = object.Item ( UnitID )

Parameters:

UnitID As String - Measurement unit to be retrieved.

Description:

CimMeasurementUnitList.Item returns a CimMeasurementUnit by name. Use this method to obtain an existing 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.Description