CimMeasurementSystemList.Add (method)

Creates a new measurement system.

Syntax:

Set CimMeasurementSystem = object.Add ( SystemID )

Parameters:

SystemID As String - Name of the new measurement system

Description:

CimMeasurementSystemList.Add returns a new CimMeasurementSystem object. This is the method to call to create a new item. You must call CimMeasurementManager.Save to save the complete state of the measurement configuration.

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.Add("Metric_MKS")

measurementManager.Save False