Alarm.AlarmComes



AlarmComes(obItem As AlarmItem)

Parameters

obItem As AlarmItem
Returns an Object of Type AlarmItem (The AlarmItem which comes up)
ED
not used
RT
avaliable

Remarks

Returns the alarm-items objects, Event is fired when an Alarm comes up...

To get these Event, an Object has to be declared and initialised

Sample:


Dim WithEvents zAlarm As Alarm

Private Sub Project_Active()
	Set zAlarm = thisProject.Alarm
End Sub

Private Sub zAlarm_AlarmComes(ByVal obItem As IAlarmItem)
	Debug.Print obItem.Text
End Sub


See Also

Alarm, AlarmItem