Represents an action in a procedure. | |
Description: | Represents an action in a procedure. Example: Sub GefProcAction_Index() Dim oCimObj As GefObject Dim oCimProceduresObj As
GefProcedures Dim oCimProcedObj As
GefProcedure Dim oCimProcActs As
GefProcActions Dim oCimProcAct As
GefProcAction Set oCimObj = CimGetObject Set oCimProceduresObj =
oCimObj.Procedures If oCimProceduresObj.Count > 0
Then Set
oCimProcedObj = oCimProceduresObj.Item(0) Set
oCimProcActs = oCimProcedObj.Actions If
oCimProcActs.Count > 0 Then Set
oCimProcAct = oCimProcActs.Item(0) MsgBox
"The first action has an index of " & _ oCimProcAct.Index Else MsgBox
"There are no actions" End
If Else MsgBox "The
object does not have any procedures" End If End Sub |
Properties: | Application , Confirm , Index , Parent , Type |
Methods: | GetAbsoluteSetpoint , GetExecuteCommand , GetInvokeMethod , GetInvokeScript , GetOpenScreen , GetOpenScreenEx , GetOpenScreenEx2 , GetOpenScreenEx3 , GetOverlayScreen , GetOverlayScreenEx , GetOverlayScreenEx2 , GetRampSetpoint , GetRelativeSetpoint , GetToggleSetpoint , GetVariableAssign , GetVariableSetpoint , SetToAbsoluteSetpoint , SetToCloseScreen , SetToExecuteCommand , SetToHomeScreen , SetToInvokeMethod , SetToInvokeScript , SetToOpenScreen , SetToOpenScreenEx , SetToOpenScreenEx2 , SetToOpenScreenExGeometry , SetToOverlayScreen , SetToOverlayScreenEx , SetToOverlayScreenEx2 , SetToPrevScreen , SetToPrintScreen , SetToRampSetpoint , SetToRelativeSetpoint , SetToToggleSetpoint , SetToVariableAssign , SetToVariableSetpoint |