CimEMPointEvent.TimeStamp (property, read)

Syntax PointEvent.TimeStamp
Description Date. Returns the date and time of the point change that triggered the event.)
Example 
Sub Main()
   Dim PointEvent as CimEmPointEvent
   Set PointEvent = CimGetEMEvent().PointEvent()
   PointSet "LAST_EVENT_TIME", cstr(PointEvent.TimeStamp)
End Sub