CimMeasurementAssociation.SystemID (read-only property)

Gets the identifier for the measurement system.
Syntax: String = object.SystemID
Description: The SystemID property gets the identifier of the measurement system.



Example:

Dim project As CimProject
Set project = CreateObject("CimProject")
project.OpenLocalProject "d:\classes\classes.gef"
Dim measurementManager As CimMeasurementManager
Dim measurementAssocList As CimMeasurementAssociationList
Dim measurementAssoc As CimMeasurementAssociation
Dim measurementUnitList As CimMeasurementUnitList
Dim measurementUnit As CimMeasurementUnit
Set measurementManager = project.MeasurementManager
Set measurementUnitList = measurementManager.Units
Set measurementUnit = measurementUnitList.Item("METER")
Set measurementAssocList = measurementUnit.SystemAssociations
Set measurementAssoc = measurementAssocList.Item("Metric")
MsgBox measurementAssoc.SystemID