Gets and sets whether the text animation has an associated edit action. | |
Syntax: | VARIANT =
object.DisabledMessage object.DisabledMessage = VARIANT |
Description: | If this property is the empty string, no message
is displayed. Example: Sub LinkFormat_DisabledMessage() Dim oCimObj As GefObject Dim oCimObjProced As
GefProcedures Dim oCimExecCond As
GefExecutionCondition Set oCimObj = CimGetObject Set oCimObjProced =
oCimObj.Procedures For i = 0 To oCimObjProced.Count -
1 Set
oCimExecCond = oCimObjProced.Item(i).ExecutionCondition MsgBox "The
disabled message for procedure " & i + 1 & _ " is " & """" & oCimExecCond.DisabledMessage &
"""" Next i End Sub |