Viewer.CustomPropertyValue 属性 (Visio Viewer)
获取Microsoft Visio Viewer中指定形状的指定索引位置处 (自定义属性) 的形状数据项的值。 此为只读属性。
语法
表达式。CustomPropertyValue (ShapeIndex、 PropertyIndex)
表达 返回 Viewer 对象的表达式。
参数
名称 | 必需/可选 | 数据类型 | 说明 |
---|---|---|---|
ShapeIndex | 必需 | Long | 包含指定形状数据项的形状的索引 (自定义属性) 。 |
PropertyIndex | 必需 | Long | 形状数据项的索引 (自定义属性) 。 |
返回值
String
备注
在 Microsoft Office Visio 2007 之前的 Visio 版本中,形状数据项称为自定义属性。
示例
以下代码获取分配给Visio Viewer当前页形状集合中第一个形状的第一个形状数据项的值。 如果指定的自定义属性的值为 Hello,Visio Viewer显示消息框和“属性和设置”对话框。
Dim strPropertyValue As String
strPropertyValue = vsoViewer.CustomPropertyValue(1,1)
Debug.Print strPropertyValue
If strPropertyValue = "Hello" Then
Interaction.MsgBox ("Value is 'Hello'")
vsoViewer.DisplayPropertyDialog
End If
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。