CimMeasurementSystem.IsActive (read-only property)

Gets if the measurement system is active.

Syntax:

Boolean = object.IsActive

Description:

The IsActive property indicates if the measurement system the active system. To change the active system use the CimProject.MeasurementSystem property.

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