forms - MS Access 对象(表单、报告)显示创建或修改日期

Question

引用这个问题:MS Access 2013 对象(表、查询)显示创建或修改日期马特用以下代码回答:https://stackoverflow.com/a/36712839/6342925

第一次就成功了。如何添加到代码中以同时列出表单、报告和宏 - 并显示创建和修改日期？

Answer 1

使用CurrentProject.All*集合:AllForms； 所有报告；和AllMacros。

以下是立即窗口中的示例:

for each obj in CurrentProject.AllForms : ? obj.Name, obj.DateCreated, obj.DateModified : next
frmClaims     8/11/2015 12:11:46 PM       10/6/2015 1:08:28 PM 
frmInvoices   3/8/2015 5:04:24 PM         10/6/2015 1:08:28 PM 
frmChoosePerson             3/28/2015 1:11:51 PM        2/28/2016 8:29:28 PM 

for each obj in CurrentProject.AllReports : ? obj.Name, obj.DateCreated, obj.DateModified : next
rptPassThruQuery            3/9/2016 1:04:38 PM         3/9/2016 2:23:38 PM 
rptChangeSort 7/27/2015 10:45:38 AM       10/6/2015 1:08:30 PM 

for each obj in CurrentProject.AllMacros : ? obj.Name, obj.DateCreated, obj.DateModified : next
Macro2        6/17/2015 10:21:58 AM       6/17/2015 10:21:58 AM