Selection.Move 方法 (Visio)

将选定内容移动指定的距离。

语法

expression. Move( _dx_ , _dy_ , _UnitsNameOrCode_ )

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

参数

名称	必需/可选	数据类型	说明
Dx	必需	Double	指定要在 x 方向移动的量。
Dy	必需	Double	指定要在 y 方向移动的量。
UnitsNameOrCode	可选	Variant	指定要为 dx 和 dy 使用的单位。 有关可能值，请参阅“说明”。 默认值为 inches。

返回值

Nothing

注解

可以将 UnitsNameOrCode 指定为整数（VisUnitCodes 的成员）或字符串值（如“inches”）。 如果字符串无效或单位代码不合适（非文本），则将生成错误。

有关有效单位字符串以及对应的自动化常量（整型值）的完整列表，请参阅关于度量单位。

示例

此 Microsoft Visual Basic for Applications (VBA) 宏说明如何使用 Move 方法将选定内容移动指定的量。

Public Sub Move_Example() 
 
 Dim vsoShape1 As Visio.Shape 
 Dim vsoShape2 As Visio.Shape 
 
 Set vsoShape1 = Application.ActiveWindow.Page.DrawRectangle(1, 9, 3, 7) 
 Set vsoShape2 = Application.ActiveWindow.Page.DrawRectangle(3, 6, 5, 5) 
 
 ActiveWindow.DeselectAll 
 
 ActiveWindow.Select vsoShape1, visSelect 
 ActiveWindow.Select vsoShape2, visSelect 
 Application.ActiveWindow.Selection.Move 2, 2 
 
End Sub

支持和反馈

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