Gets and sets the description for the measurement unit. | |
Syntax: | String =
object.Description object.Description = String |
Description: | The Description property gets and sets the
description of the measurement system. 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 |