示例:根据另一个字段来更改一个字段
此示例演示如何根据输入另一个字段的值来更改字段值。
例如,将 UI Suggestion 输入类别字段时导致将缺陷分配到用户 alex_qc,输入 Security Issues 时分配到用户 alice_qc。
该示例假定用户定义的字段 BG_USER_05 用于存储类别。在“缺陷”模块中更改类别字段时,BG_RESPONSIBLE 字段将分配到相应值。
将代码添加到 Bug_FieldChange 事件过程,这样用户更改缺陷的字段值时就会触发它。
Sub Bug_FieldChange(FieldName)
On Error Resume Next
If FieldName = "BG_USER_05" then
Select case Bug_Fields("BG_USER_05").Value
case "UI Suggestion"
Bug_Fields("BG_RESPONSIBLE").value="alex_qc"
case "Security Issue"
Bug_Fields("BG_RESPONSIBLE").value="alice_qc"
Case Else
Bug_Fields("BG_RESPONSIBLE").value="non-assigned"
End Select
End If
PrintError "Bug_FieldChange"
On Error GoTo 0
End Sub

