عدم انتقال فوکوس در صورت برقرار نبودن شرط

با سلام
يه تكس باكس دارم مي‌خواهم تا يك شرط اعمال نشده فوكوس از اين باكس به باكس بعدي نرود
.
در LostFocus باكس شرط را گذاشته ام اما نمي‌توانم در صورت عدم وجود شرط فوكوس را به همان باكس برگردانم .
لطفا راهنمايي فرماييد.
با تشكر

سلام دوست عزيز
من اين نمونه رو آماده کردم ببينيد به دردتون ميخوره
موفق باشيد

سلام
شما مي تونيد شرط رو در رخداد On Exit تكست باكس شرط مورد نظر رو قائل بشيد البته شكل عمليات بهتره به صورت زير باشه :

بجاي TextBoxName نام تكست باكس خودتون رو قرار بديد

If Not IsNumeric(Me.TextBoxNmae) Then

MsgBox "مقدار وارده غير عددي است"

DoCmd.CancelEvent

End If

اينطوري كدنويسي كمتري نياز هست و براي انتقال فوكوس هم به مشكلي بر نمي خوريد .