设置或返回指定对象的完整路径(包括文件名)。对于 AccessObject 对象,为 String 型,可读写;对于 CodeProject 和 CurrentProject 对象,为 String 型,只读。
expression 必需。返回“应用于”列表中的一个对象的表达式。
下面的示例列举 AllDataAccessPages 集合中的元素并返回当前项目中链接的名称和每个数据访问页的路径。
Sub PrintDAPLocationInfo()
Dim dapObject As AccessObject
For Each dapObject In CurrentProject.AllDataAccessPages
Debug.Print "The '" & dapObject.Name & _
"' is located at: "; dapObject.FullName
Next dapObject
End Sub