将这个属性设置为true后，我们就可以查看到文档修改的一些记录了，如下截图：

示例2：下面的代码将反馈当前活动文档的名称：

Sub mynzH() '反馈当前活动文档的名称

Dim myDocName As String

myDocName = ActiveDocument.Name

MsgBox myDocName

End Sub

代码截图：

代码讲解：

在此示例中， ActiveDocument 指 Word活动窗口中的文档。该文档分配给变量的名称指 Word 的活动窗口中的文档。该文档的名称已分配给变量myDocName。

代码的执行效果：

每个对象的每个属性都有可读写的特点，包括：只能读取属性（只读）或者是只能编写属性（只写）。当选定属性时，Visual Basic 编辑器中的对象浏览器会在浏览器窗口底部显示读/写状态。如下截图：