返回显示的邮件的 Microsoft Word 文档对象模型。该对象模型可能是暂时的,不应存储供以后使用。WordEditor 属性仅在 IsWordMail 返回 True 且 EditorType 为 olEditorWord 时有效。只读。
objInspector.WordEditor
objInspector 必选。该表达式返回 Inspector 对象。
本 VBScript 示例演示 Word 对象模型的使用,它在项目的邮件区添加填充的矩形。
Sub CommandButton1_Click()
Set myInspector = Item.GetInspector
Set WordDoc = myInspector.WordEditor
Set Fill = WordDoc.Shapes.AddShape(1, 90, 90, 90, 50).Fill 'msoShapeRectangle=1
Fill.ForeColor.RGB = RGB(128, 0, 0)
Fill.BackColor.RGB = RGB(170, 170, 170)
Fill.TwoColorGradient 4, 1 'msoGradientDiagonalDown=4
End Sub