返回一个 Date 值，表明上一次对指定对象的设计进行修改的日期和时间。只读。
expression.DateCreated
expression 必需。返回“应用于”列表中的一个对象的表达式。
示 例：
下面的示例列出当前数据库中的所有报表，以及这些报表的设计被创建和修改的时间。
Private Sub Command0_Click()
Dim acobjLoop As AccessObject
For Each acobjLoop In CurrentProject.AllReports
With acobjLoop
Debug.Print .Name & " - Created " & .DateCreated _
& " - Modified " & .DateModified
End With
Next acobjLoop
End Sub
运行结果：
