This property specifies an alternative value the property assumes periodically when source's expression returns False and the BlinkOff property is set to True. The next script contains an example of using this property.

Sub BlinkOffValue_Click()
  On Error Resume Next
  Dim Value
  If Application.ShowPickColor_
    (Value, ForegroundColor, 400, 300) Then
    Dim Bind
    Set Bind = Screen.Item("Rectangle1").Links._
      Item("ForegroundColor")
    If Bind Is Nothing Then
      MsgBox "Rectangle1 has no link."
    Else
      MsgBox "Rectangle1 is linked to "& Bind.Source & "'"
      MsgBox "Changing BlinkOffValue from " &_
        Bind.BlinkOffValue & " to " & Value
      Bind.BlinkOffValue = Value
    End If
    ForegroundColor = Value
  End If
End Sub