| |
|
|
| | Хочу чтобы пользователь не мог переходить на другие поля,пока не введет номер заказа ,но обработка потери фокуса не работает-фокус перемещается на поле,в которое пользоваетль тыкает,вместо того чтобы возвращаться на поле заказ если оно пустое:
Private Sub Заказ_LostFocus()
If (Nz(Me![Заказ], "") = "") Then
MsgBox ("Номер введите")
Me![Заказ].SetFocus
End If
end sub
Подскажите,пож-ста,как это правильно реализовать? | |
| |
| |
| |
|
|
| | используйте beforeupdate или условие на значение | |
| |
| |
| |
|
|
| | Private Sub Заказ_LostFocus()
If Nz(Me.Заказ, "") = "" Then
Me.какое_либо_Поле.SetFocus 'поле, которое може получить фокус
Me.Заказ.SetFocus
End If
End Sub | |
| |
| |
