Объяснит ли кто-нибудь, почему при передвижении по записям "вниз" или "вверх" с помощью клавиш-стрелок и
достижении последней или первой записи следующий шаг "выбрасывает" фокус из текущего ComboBox`a в следующий или
предыдущий соответственно?
Для примера даю фрагмент кода:

Sub cboBox_KeyDown(KeyCode As MSForms.ReturnInteger)
With RecordSet
If KeyDown = 38 Then
.MovePreview
If .BOF Then
.MoveFirst
End If
Elseif KeyDown = 40 Then
If Not .EOF Then
.MoveNext
Else
.MoveLast
End If
End If
End With
End Sub

Примечательно то, что при пошаговом выполнении этого не происходит, т.е. курсор остаётся в cboBox`e.
Кроме того, почему то после команды .MoveNext функция .EOF становится True даже в начале списка.
Вот такие проблеммки.
Заранее благодарен
РАДАНЯ