CimMeasurementAssociation.ReverseExpression (property)

Gets and sets the expression to convert from the equivalent unit to the unit.
Syntax: String = object.ReverseExpression
object.ReverseExpression = String
Description: The ReverseExpression property gets and sets the expression to convert from the equivalent unit to the unit.



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.ReverseExpression