Цикл набора записей выделяет поля, не определенные

Question

Я выделяю поля в своей непрерывной форме, имя поля происходит из поля FieldModified.Этот код циклически перебирает все строки записи, но выделяет другие поля вместе с полем FieldModified.Я убедился, что все имена полей соответствуют именам текстовых полей FieldModified.Но я не понимаю, почему он выделяет другие поля.И каждый раз подсвечиваются одни и те же поля.Их имена не совпадают с полем FieldModified.

  Private Sub Form_Load()
    Dim rstForm As DAO.Recordset
    Dim ctl As Control
    Dim tb As Control
    Dim fldName As String
    Set rstForm = Forms!ChangedData.Form.Recordset

    Do While Not rstForm.EOF
        fldName = Me.FieldModified.value
        Me.Controls(fldName).BackColor = vbYellow

        rstForm.MoveNext
    Loop

End Sub

РЕДАКТИРОВАНИЕ: Я изменил код, и теперь он правильно подсвечивает поле первой строки, но затем выделяет одно и то же поле в каждой строке.

Private Sub Form_Load()
    Dim rstForm As DAO.Recordset
    Dim ctl As Control
    Dim fldName As String
    Set rstForm = Me.RecordsetClone

    Do While Not rstForm.EOF
        fldName = Me.FieldModified.value
        Me.Controls([fldName]).BackColor = vbYellow

        rstForm.MoveNext
        fldName = ""
    Loop

    Set rstForm = Nothing
End Sub