formatting - Access2007 で行を無限形式にフォーマットする

Question

データベース アプリケーションに連続フォームがあります。このフォームでは、product、numberofItemsOfToday、numberOfItemsOfYesterday の 3 つの列を持つテーブルのデータが表示されます。

対応する行の numberofItemsOfToday != numberOfItemsOfYesterday の場合、行を赤 (ForeColor) で色付けします。

私は何かを試しました

Private Sub Form_Current()
    addConditionalFormatingText txtnumberofItemsOfToday, numberOfItemsOfYesterday, txtProduct, txtnumberofItemsOfToday, txtnumberOfItemsOfYesterday
End Sub

Private Sub addConditionalFormatingText(field1 As Object, field2 As Object, t1 As TextBox, t2 As TextBox, t3 As TextBox)
    Dim color As Long
    color = IIf(CBool(Nz(field1.Value, "") <> Nz(field2.Value, "")), RGB(255, 0, 0), RGB(0, 0, 0))
    t1.ForeColor = color
    t2.ForeColor = color
    t3.ForeColor = color
End Sub

しかしもちろん問題は、1 つの行で値が異なる場合、すべての行が赤くなることです。連続フォームで特別な行の色のみを設定するにはどうすればよいですか?