CimEMEvent.TimeStamp (property, read)

Syntax Event.TimeStamp
Description Date. Returns the Time Stamp at which the event occurred.
Example 
Sub Main()
   Dim event as CimEMEvent
   Set event = CimGetEMEvent()
   PointSet "LAST_EVENT_TIME", cstr(eent.TimeStamp)
End Sub