WrapFormat 对象

         
多种对象
WrapFormat

代表在图形或图形区周围环绕文字的属性。

使用 WrapFormat 对象

WrapFormat 属性可返回 WrapFormat 对象。下列示例实现的功能是:将一个椭圆添至活动文档,并指定文档文字环绕在椭圆周围的方框的左右两边。在文档文字与图形的方框的上、下、左、右四边之间都有 0.1 英寸的边距。

Set myOval = _
    ActiveDocument.Shapes.AddShape(msoShapeOval, 36, 36, 100, 35)
With myOval.WrapFormat
    .Type = wdWrapSquare
    .Side = wdWrapBoth
    .DistanceTop = InchesToPoints(0.1)
    .DistanceBottom = InchesToPoints(0.1)
    .DistanceLeft = InchesToPoints(0.1)
    .DistanceRight = InchesToPoints(0.1)
End With