Visio) (ValidationRules.Add 方法

將新的空白 ValidationRule 物件新增至文件的 ValidationRules 集合中。

語法

運算式。新增 (NameU)

運算式 代表 ValidationRules 物件的變數。

參數

傳回值

ValidationRule

註解

如果 NameU 參數不是有效的字串，Visio 將傳回「無效的參數」錯誤。

新驗證規則的預設屬性值如下：

• 類別 = [空白]
• 描述 = “未知”
• FilterExpression = [空白]
• 已略過 = 否
• TargetType = visRuleTargetShape
• TestExpression = [空白]

範例

下列範例程式碼是根據以下提供者提供的程式碼： David Parker

下列 Visual Basic for Applications (VBA) 範例示範如何使用 Add 方法，將名為 “UngluedConnector” 的新驗證規則新增至使用中文件中名為 “Fault Tree Analysis” 的現有驗證規則集。

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 支援與意見反應。