DateModified 属性

       

返回一个 Date 值,表明上一次对指定对象的设计进行修改的日期和时间。只读。

expression.DateModified

expression   必需。返回“Applies To”列表中的一个对象的表达式。

示例

下面的示例列出当前数据库中的所有报表,以及这些报表的设计被创建和修改的时间。

Dim acobjLoop As AccessObject

For Each acobjLoop In CurrentProject.AllReports
    With acobjLoop
        Debug.Print .Name & " - Created " & .DateCreated _
            & " - Modified " & .DateModified
    End With
Next acobjLoop