Shape.Offset 方法 (Visio)

将形状偏移一段指定距离。

语法

表达式。偏移 (距离)

表达 一个代表 Shape 对象的变量。

参数

名称	必需/可选	数据类型	说明
距离	必需	Double	指定形状要偏移的距离。

返回值

Nothing

注解

调用 Offset 方法等效于在 Microsoft Visio 用户界面中单击“偏移”（单击“开发工具”选项卡上的“形状设计”组中的“操作”）。

对于指定的线条或曲线，偏移作为与原始线条或曲线距离相等的一对线条或曲线来实现。 偏移形状将继承原始形状中的线型。 它们不继承原始形状中的任何填充图案或文本。

示例

以下 Microsoft Visual Basic for Applications (VBA) 宏显示如何使用 Offset 方法将线条形状偏移一段指定的距离。

Public Sub Offset_Example() 
 
 Dim vsoShape As Visio.Shape 
 
 Set vsoShape = Application.ActiveWindow.Page.DrawLine(3, 3, 6, 6) 
 
 ActiveWindow.DeselectAll 
 ActiveWindow.Select vsoShape, visSelect 
 vsoShape.Offset(2) 
 
End Sub

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。