Примечание.
Для доступа к этой странице требуется авторизация. Вы можете попробовать войти или изменить каталоги.
Для доступа к этой странице требуется авторизация. Вы можете попробовать изменить каталоги.
Добавляет новый пустой объект ValidationRule в коллекцию ValidationRules документа.
Синтаксис
expression. Добавить (NameU)
выражение Переменная, представляющая объект ValidationRules .
Параметры
| Имя | Обязательный или необязательный | Тип данных | Описание |
|---|---|---|---|
| NameU | Обязательный | String | Универсальное имя, присваиваемого новому правилу проверки. |
Возвращаемое значение
ValidationRule
Замечания
Если параметр NameU не является допустимой строкой, Visio возвращает ошибку "Недопустимый параметр".
Значения свойств по умолчанию нового правила проверки:
- Category = [empty]
- Description = "Unknown"
- FilterExpression = [empty]
- Игнорировать = Ложный
- TargetType = visRuleTargetShape
- TestExpression = [empty]
Пример
Следующий пример кода основан на коде, предоставленном : Дэвид Паркер
В следующем примере Visual Basic для приложений (VBA) показано, как использовать метод Add для добавления нового правила проверки с именем "UngluedConnector" в существующий набор правил проверки с именем "Анализ дерева ошибок" в активном документе.
Public Sub Add_Example()
Dim vsoValidationRule As Visio.ValidationRule
Dim vsoValidationRuleSet As Visio.ValidationRuleSet
Dim strValidationRuleSetNameU As String
Dim strValidationRuleNameU As String
strValidationRuleSetNameU = "Fault Tree Analysis"
strValidationRuleNameU = "UngluedConnector"
Set vsoValidationRuleSet = ActiveDocument.Validation.RuleSets(strValidationRuleSetNameU)
Set vsoValidationRule = vsoValidationRuleSet.Rules.Add(strValidationRuleNameU)
End Sub
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.