Gets and sets the text of the enum field. | |
Syntax: | String =
object.Text object.Text = String |
Description: | The Text property gets and sets the text of
the point enum field. Example: Dim project As CimProject Set project = CreateObject("CimProject") project.OpenLocalProject "d:\classes\classes.gef" Dim pointEnums As CimPointEnumList Dim pointEnum As CimPointEnum Dim pointEnumFields As CimPointEnumFieldList Dim pointEnumField As CimPointEnumField Set pointEnums = project.PointEnums Set pointEnum = pointEnums.Item("TurbineStates") Set pointEnumFields = pointEnum.Fields Set pointEnumField =
pointEnumFields.Item("Starting") pointEnumField.Text = "Cold Starting" pointEnum.Save False |