本示例显示活动文档第一节中修订的总数。
MsgBox ActiveDocument.Sections(1).Range.Revisions.Count