CimEMPointEvent.Id

Syntax PointEvent.Id
Description String. Returns the Point ID of the point that triggered the event.
Example 
Sub Main()
   Dim PointEvent as CimEmPointEvent
   Set PointEvent = CimGetEMEvent().PointEvent()
   ' perform processing
   ' reset the event point to 0
   PointSet PointEvent.Id, 0
End Sub
Note CimEMPointEvent can only be used from the Event Manager. It is not valid in CimView/CimEdit