ValidationRules.Add 方法 (Visio)

在文件的 ValidationRules 集合中新增一個新的空 ValidationRule 物件。

語法

表情。新增 (NameU)

詞 一個代表 ValidationRules 物件的變數。

參數

名稱	必要/選用	資料類型	描述
NameU	必要	字串	要指派給新驗證規則的通用名稱。

傳回值

ValidationRule

註解

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

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

• 類別 = [空]
• 描述 = 「未知」
• FilterExpression = [空]
• 被 = 忽視偽
• 目標類型 = visRuleTargetShape
• TestExpression = [空]

範例

以下範例程式碼基於 David Parker 提供的程式碼

以下 Visual Basic 應用程式 (VBA) 範例展示了如何使用 Add 方法，在現有的驗證規則集「Fault Tree Analysis」中新增名為「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 支援與意見反應。