Question

全部显示

应用于 Borders 对象的 Shadow 属性。

如果为 True，则指定的边框设置为阴影格式。Boolean 类型，可读写。

expression.Shadow

expression 必需。该表达式返回一个 Borders 对象。

应用于 Font 对象的 Shadow 属性。

如果为 True，则指定的字体设为阴影格式。属性值可以取 True、False 或 wdUndefined。Long 类型，可读写。

expression.Shadow

expression 必需。该表达式返回一个 Font 对象。

应用于 Shape 和 ShapeRange 对象的 Shadow 属性。

返回一个 ShadowFormat 对象，该对象代表指定图形的阴影格式。

expression.Shadow

expression 必需。该表达式返回以上一个对象。

示例

当应用于 Borders 对象时。

本示例在新文档中演示两种不同的边框样式。

Set myRange = Documents.Add.Content
With myRange
 .InsertAfter "Demonstration of border with shadow."
 .InsertParagraphAfter
 .InsertParagraphAfter
 .InsertAfter "Demonstration of border without shadow."
End With
With ActiveDocument
 .Paragraphs(1).Borders.Shadow = True
 .Paragraphs(3).Borders.Enable = True
End With

当应用于 Font 对象时。

本示例对所选内容应用阴影和加粗格式。

If Selection.Type = wdSelectionNormal Then
 With Selection.Font
 .Shadow = True
 .Bold = True
 End With
Else
 MsgBox "You need to select some text."
End If

当应用于 Shape 和 ShapeRange 对象时。

本示例向活动文档中添加一个带阴影格式的箭头。

Set myShape = ActiveDocument.Shapes _
 .AddShape(Type:=msoShapeRightArrow, _
 Left:=90, Top:=79, Width:=64, Height:=43)
myShape.Shadow.Type = msoShadow5