Me.A.Locked = (Time() > #7:00:00 AM# And Time() < #3:00:00 PM#)
Me.B.Locked = (Time() > #7:00:00 AM# And Time() < #2:00:00 PM#)
If (Time() > #7:00:00 AM# And Time() < #2:00:00 PM#) Then
Me.lblNotify.Caption = "Locked"
Else
Me.lblNotify.Caption = "Unlocked"
End If