CimAlarmClass.NormalBlinkRate (property)

Gets and sets the normal state blink rate in 10ths of a second.

Syntax:

short = object.NormalBlinkRate
object.NormalBlinkRate = short

Description:

The NormalBlinkRate property gets and sets the normal state blink rate in 10ths of a second. Use a blink rate of zero to indicate that blinking should not occur.

Example:

Dim project As CimProject
Set project = CreateObject("CimProject")
project.OpenLocalProject "d:\classes\classes.gef"
Dim alarmClasses As CimAlarmClassList
Dim alarmClass As CimAlarmClass
Set alarmClasses = project.AlarmClasses
Set alarmClass = alarmClasses.Item("NCRIT")
alarmClass.NormalBlinkRate = 0
alarmClass.Save False