Represents the edition part of a check.
The following example shows how to access the Check check1
from an existing RuleSet RS1 of the RuleBase RB1
Dim CATDocs As Document
Set CATDocs = CATIA.Documents
Dim partdoc As PartDocument
Set partdoc = CATDocs.Add("CATPart")
Dim part As Part
Set part = partdoc.Part
Dim relations As Relations
Set relations = part.Relations
Dim Rulebase As ExpertRuleBaseRuntime
Set RuleBase = relations.Item("RB1")
Dim Ruleset As ExpertRuleSetRuntime
Set RuleSet = RuleBase.RuleSet.ExpertRuleBaseComponentRuntimes.Item("RS1")
Dim Check1 As ExpertCheckRuntime
Set Check1 = RuleSet.ExpertRuleBaseComponentRuntimes.Item("Check1")