窗体顶端Document对象支持三种事件：Close、New 和 Open。若要在名为“ThisDocument”的类模块中编写响应这些事件的过程。可用下列步骤创建事件过程。
在“工程资源管理器”窗口中的 Normal 工程或文档工程下，双击“ThisDocument”。（“ThisDocument”位于“文件夹”视图中的“Microsoft Word对象”文件夹中）。
从“对象”下拉列表框中选择“Document”。
从“过程”下拉列表框中选择一个事件。
类模块中即增加了一个空子程序。
添加要在事件发生时运行的 Visual Basic 指令。
下例显示了 Normal 工程中的一个New事件过程，它在新建一个基于 Normal 模板的文档时运行。
Private Sub Document_New()
MsgBox "New document was created"
End Sub
下例显示了文档工程中的Close事件过程，该过程只在该文档关闭时运行。
Private Sub Document_Close()
MsgBox "Closing the document"
End Sub
与自动宏不同，Normal 模板中的事件过程没有全局区。例如，Normal 模板中的事件过程只有在附加模板为 Normal 模板时才发生。
如果文档及其附加模板中存在自动宏，则仅运行保存在文档中的自动宏。如果文档及其附加模板中都存在文档事件过程，则两个事件过程都会运行。
说明
有关创建Application对象事件过程的详细信息，请参阅使用 Application对象事件。
