示例：字段更改时更改字段属性

此示例演示如何在更改不同字段时更改字段的属性。

在此示例中，如果缺陷的状态 (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
            ' Enter your code here.
        End If
        PrintError "Bug_FieldChange"
        On Error GoTo 0
End Sub