CimEMAlarmEvent.ResourceID (property, read)

Syntax AlarmEvent.ResourceID
Description String. Returns the Resource ID of the alarm that triggered the event.
Example 
Sub Main()
   Dim AlarmEvent as CimEmAlarmEvent
   Set AlarmEvent = CimGetEMEvent().AlarmEvent()
   PointSet "LAST_ALARM_RESOURCE_ID", AlarmEvent.ResourceID
   End if
End Sub