例：フィールド変更時のフィールドのプロパティの変更

この例では、別のフィールドが変更されたときにあるフィールドのプロパティを変更する方法を例示します。

この例では、不具合のステータス（BG_STATUS）をClosed（終了）に変更するときに、ユーザはフィールド［終了バージョン］（BG_CLOSING_VERSION）に値を入力する必要があります。

Bug_FieldChange イベント・プロシージャにコードを追加して、ステータスがClosed（終了）に変更されたときに、［終了バージョン］フィールドを必須フィールドにします。

Sub Bug_FieldChange(FieldName)
        On Error Resume Next
        If FieldName= "BG_STATUS" then
            If Bug_Fields("BG_STATUS").value="Closed" then
                Bug_Fields("BG_CLOSING_VERSION").IsRequired=True
            Else
                Bug_Fields("BG_CLOSING_VERSION").IsRequired=False
            End If
        Else
            ' コードをここに入力します
        End If
        PrintError "Bug_FieldChange"
        On Error GoTo 0
End Sub