Visio) (GraphicItem.GetExpression 方法

获取形状数据项 (GraphicItem 表示的自定义属性) 的标签,或作为 GraphicItem 对象规则一部分的表达式字符串的值,将对其计算形状数据。

注意

此 Visio 对象或成员仅供 Visio Professional 2013 的授权用户使用。

语法

expression。 GetExpression( _Field_ , _Expression_ )

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

参数

名称 必需/可选 数据类型 说明
Field 必需 VisGraphicField out 参数。 VisGraphicField 枚举中的常量值,该值指定 Expression 是形状数据项标签,还是主要数据字段 (列的 ShapeSheet 电子表格中的公式) 分配给图形项。 有关可能值,请参见备注。
Expression 必需 String out 参数。 与 Field 参数相关联的 ShapeSheet 表达式。

返回值

Nothing

注解

作为 Out 参数返回的 Field 值是 VisGraphicField 枚举的下列值之一,该枚举在 Microsoft Visio 类型库中声明。

常量 值 说明
visGraphicPropertyLabel 1 形状数据项目的标签。
visGraphicExpression 2 形状数据项的 ShapeSheet 公式。

示例

以下 Microsoft Visual Basic for Applications (VBA) 宏说明如何使用 GetExpression 方法获取一个数据图形项的字符串表达式的值。 它获取 visTypeDataGraphic 类型的主对象的 GraphicItems 集合中第一个图形项最近应用的表达式 (通常称为名为“Data Graphic”的数据图形) ,并在“即时”窗口中打印该字段和表达式。

注意

在 Visio 用户界面中的“数据图形”任务窗格中,将鼠标移动到主控形状上方,便可确定现有数据图形主控形状的名称。

该宏假定当前文档中存在名为 “Data Graphic” 的数据图形。 有关将数据图形母版添加到当前文档的 母版 集合的详细信息,请参阅 Masters.AddEx。

Public Sub GetExpression() 
 
    Dim vsoGraphicItem As Visio.GraphicItem 
    Set vsoGraphicItem = ActiveDocument.Masters("Data Graphic").GraphicItems(1) 
    Dim strExpression As String 
    Dim fieldName As VisGraphicField 
     
    vsoGraphicItem.GetExpression fieldName, strExpression 
    Debug.Print strExpression 
    Debug.Print fieldName 
 
End Sub

支持和反馈

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