PslHistoryItem.Date

Returns the date of this history item.

Syntax

Expression.Date as Date

Expression Object of type PslHistoryItem

Example

Sub HandleTransString(t As PslTransString)
  Dim item As PslHistoryItem
  For Each item In t.History
    If item.State(pslHistoryTextChanged) Then
      PSL.Output "At " & CStr(item.Date) & " " & item.UserName _
        & " changed the text to """ & item.Text & """"
    End If
  Next item
End Sub