CimMeasurementSystemList.Item (read-only property)

Gets the a measurement system by name.

Syntax:

Set CimMeasurementSystem = object.Item ( SystemID )

Parameters:

SystemID As String - Measurement system to be retrieved.

Description:

CimMeasurementSystemList.Item returns a CimMeasurementSystem by name. Use this method to obtain an existing measurement system.

Example:

Dim project As CimProject
Set project = CreateObject("CimProject")
project.OpenLocalProject "d:\classes\classes.gef"
Dim measurementManager As CimMeasurementManager

Dim measurementSystemList As
CimMeasurementSystemList

Dim measurementSystem As CimMeasurementSystem

Set measurementManager =
project.MeasurementManager

Set measurementSystemList =
measurementManager.Systems

Set measurementSystem =
measurementSystemList.Item("Metric")

MsgBox measurementSystem.IsActive