指定文字环绕指定形状的方式。 读/写。
语法
表达式。类型
表达 一个代表 WrapFormat 对象的变量。
备注
类型 属性值可以是在 Microsoft 发布服务器类型库声明的 PbWrapType 常量之一。
示例
以下示例将一个椭圆添加到活动出版物中,并指定出版物文字在环绕椭圆的正方形的左、右两边环绕。
Sub SetTextWrapType()
Dim shpOval As Shape
Set shpOval = ActiveDocument.Pages(1).Shapes.AddShape( _
Type:=msoShapeOval, Left:=36, Top:=36, _
Width:=100, Height:=35)
With shpOval.TextWrap
.Type = pbWrapTypeSquare
.Side = pbWrapSideBoth
End With
End Sub
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。