通过

Master.Close 方法 (Visio)

  • 项目

关闭主控形状。

语法

表达式。关闭

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

返回值

Nothing

注解

使用 Open 方法打开主控形状进行编辑后，请使用 Master 对象的 Close 方法。 Close 方法将对主控形状所做的任何更改在它处于打开状态时应用到该主控形状的实例。

示例

以下示例说明如何关闭所有打开的 ShapeSheet 窗口。 该示例假定在 Microsoft Visio 中至少打开了一个 ShapeSheet 窗口。

 
Public Sub Close_Example() 
 Dim intCounter As Integer 
 intCounter = Windows.Count 
 
 'Close all ShapeSheet windows that are open. 
 While intCounter <> 0 
 If Windows(intCounter).Type = visSheet Then 
 Windows(intCounter).Close 
 intCounter = Windows.Count 
 Else 
 intCounter = intCounter - 1 
 End If 
 Wend 
End Sub

支持和反馈

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