' 新しいグループを作成して WinValidator に追加します。 Me.UltraValidator1.ValidationGroups.Add( _ New Infragistics.Win.Misc.ValidationGroup("TextGroup")) ' 2 つの TextBox コントロールの ValidationSettings オブジェクトを取得します。 Dim vs1 As Infragistics.Win.Misc.ValidationSettings = _ Me.UltraValidator1.GetValidationSettings(Me.textBox1) Dim vs2 As Infragistics.Win.Misc.ValidationSettings = _ Me.UltraValidator1.GetValidationSettings(Me.textBox2) ' TextBox のテキストが "ultra" で開始する場合に ' 検証が失敗する新しい条件を作成します。 Dim condition As Infragistics.Win.OperatorCondition = _ New Infragistics.Win.OperatorCondition( _ Infragistics.Win.ConditionOperator.DoesNotStartWith, _ "ultra") ' 2 つの ValidationSettings オブジェクトで条件を設定します。 vs1.Condition = condition vs2.Condition = condition ' 適切なメソッドまたはイベントで、グループのキーを ' 渡すことでグループを検証します。 Me.UltraValidator1.Validate("TextGroup")