Viewer.OnLayerChanged 事件 (Visio Viewer)

在Microsoft Visio Viewer打开的文档中更改层时发生。

语法

表达式。OnLayerChanged (LayerIndex、 Visible、 ColorOverride、 Color、 ColorTrans)

表达 返回 Viewer 对象的表达式。

参数

名称	必需/可选	数据类型	说明
LayerIndex	必需	Long	已更改层的索引。
Visible	必需	Boolean	指示更改的层在用户界面中是否可见。
ColorOverride	必需	Boolean	指示是否重写已更改层上的形状的颜色。
Color	必需	OLE_COLOR	已更改的层的颜色，以 RGB 值表示。
ColorTrans	必需	Double	已更改层的透明度百分比。

备注

可以在“ 层属性 ”对话框中更改图层，也可以使用 LayerColor、 LayerColorOverride、 LayerColorTrans 和 LayerVisible 属性以编程方式更改图层。

示例

以下代码演示如何使用 OnLayerChanged 事件在“即时”窗口中显示已更改层的新透明度百分比。

Private Sub vsoViewer_OnLayerChanged(ByVal LayerIndex As Long, ByVal Visible As Boolean, ByVal ColorOverride As Boolean, ByVal Color As stdole.OLE_COLOR, ByVal ColorTrans As Double)

    Debug.Print "The new transparency percentage is"; ColorTrans

End Sub

支持和反馈

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