Page.DropContainer 方法 (Visio)

在页面上创建新的容器 Shape 对象，将容器放在指定的目标形状周围，并将目标形状添加到容器。 返回容器形状。

语法

expression。 DropContainer( _ObjectToDrop_ , _TargetShapes_ )

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

参数

名称	必需/可选	数据类型	说明
ObjectToDrop	必需	[未知]	要添加到页面的容器形状。 可以是 Master、 MasterShortcut、 Shape 或 IDataObject 对象。
TargetShapes	必需	[未知]	容器应该包含的形状。 可以是 Shape 或 Selection 对象。 形状或所选内容必须已存在于页面上。

返回值

Shape

备注

若要传递 ObjectToDrop 参数的 Master 对象，请使用 Documents.OpenEx 方法和 Application.GetBuiltInStencilFile 方法，向其传递 visBuiltInStencilContainers，以打开隐藏的内置容器模具。 然后使用 Masters.ItemU 属性从模具中获取所需的特定容器。

传递给 ObjectToDrop 的 IDataObject 必须由 Microsoft Visio 提供，并且必须与 Visio 位于相同的进程空间。

如果 ObjectToDrop 不是 Visio 对象，或者不是容器，则 Visio 将返回“参数无效”错误。 如果传递的值不是匹配方法上下文的形状，则 Visio 将返回“源无效”错误。

如果 TargetShapes 参数为 Nothing，Visio 会将容器形状置于页面中心，而没有任何目标形状。 如果指定的目标形状不是页面的顶级成员，则 Visio 将返回“参数无效”错误。

DropContainer 方法对应于 Visio 用户界面中的“插入容器”命令。 (在“ 插入 ”选项卡上，单击“ 容器”。)

示例

以下Visual Basic for Applications (VBA) 示例演示如何使用 DropContainer 方法将隐藏的内置容器模具中的容器添加到活动页面，以包含所选形状。 在运行此宏之前，请确保活动页上有一个所选的形状 (或所选的形状) 。

Public Sub DropContainer_Example()

    Dim vsoDocument As Visio.Document
    Set vsoDocument = Application.Documents.OpenEx(Application.GetBuiltInStencilFile(visBuiltInStencilContainers, visMSUS), visOpenHidden)
    Application.ActivePage.DropContainer vsoDocument.Masters.ItemU("Container 1"), Application.ActiveWindow.Selection
    vsoDocument.Close
    
End Sub

支持和反馈

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