在用户保存了活动文档之后发生。
Private Sub expression_OnAfterSave(Success As Boolean)
expression 引用 PageWindowEx 类型对象的变量名称,该对象是在类模块中以事件方式声明的。
Success Boolean 类型,表明操作是否成功。如果为 True,则文件已经保存。
下列示例中的事件在扩展网页窗口中的活动文档保存之后发生。根据操作的结果向用户显示一条消息。
Private Sub PgeWindowEx_OnAfterSave(Success As Boolean)
'Displays message based on value of Success
If Success = True Then
MsgBox "The file " & PgeWindowEx.ActiveDocument.Title & " was saved."
Else
MsgBox "The file " & PgeWindowEx.ActiveDocument.Title & " was not saved."
End If
End Sub