Здравствуйте! Вопрос следующий:
Есть форма с полями Поле1, Поле2, Поле3.
Значение, вводимое в Поле2, согласно условию решаемой задачи должно быть строго больше значения в Поле1.
Хочу, в этой связи, написать процедуру обработки события, которая проверяла бы это условие и в случае его нарушения выводила бы сообщение об ошибке, очищала бы содержимое Поле2 и возвращала бы фокус в Поле2.

Примерно вот так:

Private Sub Поле2_AfterUpdate()
Dim Мsg1
Мsg1 = "Ошибка! Значение в Поле 2 должно быть больше значения в Поле 1."
If Поле2 < Поле1 Then
    MsgBox msg1
    Поле2 = Null
End If
    Поле2.SetFocus
End Sub

В итоге, окно с сообщением об ошибке появляется. После нажатия кнопки ОК Поле2 очищается (для повторного ввода корректного значения), но фокус перемещается в следующее поле - Поле3. Строка Поле2.SetFocus не выполняется по какой-то причине, третий день не могу разобраться по какой. Прошу помощи...
ПРИМЕЧАНИЕ: В более ранней версии офиса (2003) данная процедура работала корректно.

http://www.sql.ru/forum/1252502/pomogite-razobratsya-s-ustanovkoy-kursora-v-pole-access-2016