Перебирайте записи в отчете и сравнивайте значения

Question

Я пытаюсь перебрать набор записей отчетов (строку) и сравнить заголовок элемента управления со значением в поле. Ничто из того, что я пробовал, не работает.

код

Private Sub Report_Load()

    Dim rstForm As DAO.Recordset
    Dim fldName As String
    Set rstForm = Forms!ChangedData.Form.Recordset

    Do While Not rstForm.EOF
    If (Me.lblCompetitive.Caption = FieldModified.value) Then
        Me.Competitive.BackColor = vbYellow
    End If

    rstForm.MoveNext
    Loop

End Sub