
Automation 2-47
2-47
value, current value, and status.
The example below, enumerates through all the column
specifications and displays in a property view whether the
specification is active or an estimate.
ColumnStage(s) & SeparationStage
The ColumnStages object is a collection of ColumnStage objects
accessed through ColumnFlowsheet. SeparationStage is an
object of ColumnStage and provides a variety of properties
Syntax: ColumnSpecification
Set hyColumn = hyCase.Flowsheet.Operations(“ColumnOp”).Item(0)
Set hyColumnFlowsheet = hyColumn.ColumnFlowsheet
By Index:
Set hyColumnSpec = hyColumnFlowsheet. Specifications.Item(0)
By name:
Set hyColumnSpec = hyColumnFlowsheet.Specifications.Item(“specname”)
Example: ColumnSpecification
Dim hyColumnSpec As ColumnSpecification
Dim hyColumnSpecs As ColumnSpecifications
Dim hyColumn As ColumnOp
Dim hyColumnFlowsheet As ColumnFlowsheet
Set hyColumn = hyCase.Flowsheet.Operations(“ColumnOp”).Item(1)
Set hyColumnFlowsheet = hyColumn.ColumnFlowsheet
Set hyColumnSpecs = hyColumnFlowsheet.Specifications
For Each hyColumnSpec In hyColumnSpecs
If hyColumnSpec.IsActive Then
MsgBox “Column spec '" & hyColumnSpec & “' is active.”
Else
MsgBox “Column spec '" & hyColumnSpec & “' is an estimate.”
End If
Next hyColumnSpec
Komentáře k této Příručce