Свойство ValidationRule.TestExpression (Visio)

Получает или задает логическое выражение, определяющее, удовлетворяет ли целевой объект условию. Для чтения и записи.

Синтаксис

выражение. TestExpression

выражение Переменная, представляющая объект ValidationRule .

Возвращаемое значение

String

Примечания

При проверке схемы с помощью метода Validate или нажатия кнопки Проверить схему на вкладке "Процесс " Microsoft Visio использует тестовое выражение, заданное в качестве значения свойства TestExpression , чтобы определить, удовлетворяет ли целевой объект условию. Если тестовое выражение оценивается как "Ложь", Visio создает ошибку проверки. Если тестовое выражение принимает значение True, проблема проверки не возникает.

Visio вычисляет тестовое выражение для целевых объектов только в том случае, если значение свойства FilterExpression объекта ValidationRule оценивается как True.

Синтаксис значения свойства TestExpression такой же, как и у выражения ShapeSheet. Когда вы устанавливаете значение свойства TestExpression, Visio не проверка синтаксиса тестового выражения. Если тестовое выражение не является синтаксически правильным, во время проверки вычисление выражения завершается ошибкой, и в этот момент в Visio возникает проблема проверки.

Пример

В приведенном ниже примере Visual Basic для приложений (VBA) показано, как использовать свойство TestExpression для определения того, удовлетворяет ли конкретный целевой объект фигуры условию.

' Add a validation rule to the document.
Set vsoValidationRule = vsoValidationRuleSet.Rules.Add("Unglued2DShape")
vsoValidationRule.Category = "Shapes"
vsoValidationRule.Description = "This 2-dimensional shape is not connected to
any other shape."
vsoValidationRule.Ignored = False
vsoValidationRule.TargetType = Visio.VisRuleTargets.visRuleTargetShape

' The validation function Is1D() returns a Boolean value that indicates 
' whether the shape is 1D (True) or 2D (False).
vsoValidationRule.FilterExpression = "NOT(Is1D())"

' The validation function GLUEDSHAPES returns a set of 
' shapes glued to the shape.
' It takes as input one parameter that indicates the direction of the glue.
' The direction values are equivalent to members of VisGluedShapesFlags:
' 0 = visGluedShapesAll1D, and 3 = visGluedShapesAll2D
' It takes as input one parameter indicating the direction of the glue.

' The validation function AGGCOUNT takes a set of shapes as its input, and 
' returns the number of shapes in the set.
vsoValidationRule.TestExpression = "AGGCOUNT(GLUEDSHAPES(0)) + AGGCOUNT(GLUEDSHAPES(3)) > 0"

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.