|
Private Sub Form_Current() If Me..Value = "" Then Me..Locked = True Me..Locked = True '.. .Locked = True ' ElseIf Me..Value = "" Then Me..Locked = False Me..Locked = False '.. .Locked = False ' End If End Sub
http://www.sql.ru/forum/1131843/blokirovka-zapisi-na-forme-pri-uslovii-v-pole