Application.BeforeShapeDelete 事件 (Visio)

在删除形状之前，发生此事件。

语法

表达式。BeforeShapeDelete (Shape)

expression：表示 Application 对象的变量。

参数

名称	必需/可选	数据类型	说明
Shape	必需	[IVSHAPE]	要删除的形状。

备注

如果形状的 Type 属性是 visTypeGroup (2) 或 visTypePage (1) ，则 Shape 对象可用作 BeforeShapeDelete 事件的源对象。

BeforeSelectionDelete 和 BeforeShapeDelete 事件相似，因为它们在删除形状之前会触发。 它们的区别在于，当单个操作删除多个形状时它们的行为方式不同。 假定一个“剪切”操作删除三个形状。 BeforeShapeDelete 事件触发三次并分别作用于三个对象中的每个对象。 BeforeSelectionDelete 事件触发一次，并作用于所选的要删除的三个形状所在的 Selection 对象。

如果您使用 Microsoft Visual Basic 或 Visual Basic for Applications (VBA)，则此主题中的语法描述的是一种通用而有效的事件处理方法。

如果要创建自己的 Event 对象，请使用 Add 或 AddAdvise 方法。

若要创建可运行加载项的 Event 对象，请使用 Add 方法，因为它适用于 EventList 集合。

若要创建可接收通知的 Event 对象，请使用 AddAdvise 方法。

若要查找要创建的事件的事件代码，请参阅事件代码。

注意

使用 VBA WithEvents 关键字来接收器 BeforeShapeDelete 事件。

出于性能方面的考虑，Document 对象的事件集不包含 BeforeShapeDelete 事件。 若要从 VBA 项目中的 Document 对象 (和 ThisDocument 对象) 中接收器 BeforeShapeDelete 事件，必须使用 AddAdvise 方法。

支持和反馈

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