返回 String 类型的值,该值代表当前文档上次修改的日期和时间。只读。
expression.lastModified
expression 必选。返回 DispFPHTMLDocument 的表达式。
下列示例显示文件名及其上次修改的日期。
Sub GetLastModifiedDate()
'Returns the last modification date of the current document
    Dim objApp As FrontPage.Application
    Dim objDoc As DispFPHTMLDocument
    Set objApp = FrontPage.Application
    Set objDoc = objApp.ActiveDocument
    'Display name of file and date last modified.
    MsgBox "The file " & objDoc.nameProp & " was last modified on " & _
            objDoc.lastModified & "."
End Sub