Форма доступа становится грязной при нажатии кнопки после загрузки формы и без изменений

Question

Я проверяю, является ли запись Грязной, прежде чем будет выведена следующая запись, и показываю всплывающее окно, предлагающее пользователю сохранить или удалить изменения.

Если я загружаю форму доступа и не нажимаю на подчиненную форму, событие щелчка кнопки «Следующая запись» изменяет состояние формы на Me.Dirty = True.

Это вызывает всплывающее окно, когда пользователь не изменил никаких значений, тем самым нарушая мою логику. Как я могу избежать этого поведения?

Private Sub cmdNxtRcd_Click()
    On Error GoTo Err_cmdNxtRcd_Click

    Me.subfrmLoadEntry_Maintain.Form.afe_Click
    If Me.Dirty = True Then
        MsgBox "Please Save or Cancel Changes"

    ElseIf Me.subfrmLoadEntry_Maintain.Form.Dirty = True Then
        MsgBox "Please Save or Cancel Changes sub"

    Else

        DoCmd.GoToRecord , , acNext
    End If

    Exit_cmdNxtRcd_Click:
    Exit Sub

    Err_cmdNxtRcd_Click:
    MsgBox Err.description
    Resume Exit_cmdNxtRcd_Click

End Sub