locked field msg box please help

[minder]

NOW SORTED THANKS FOR LOOKING


hi ok this is what im trying to do.

i have 4 fields on a form and one of them is locked or unlocked depending on user access level
so i would lile a mgs box to show when someone clicks in the field(saying this field is locked) when it is locked and no msg box to show if the field is unlocked

if this helps this is the user acces code im useing on form open
Private Sub Form_Open(Cancel As Integer)
Select Case User.AccessID
Case 1, 2
Equipment.Locked = False
Case Else
Equipment.Locked = True


End Select
Select Case User.AccessID
Case 1, 2
SERIAL.Locked = False
Case Else
SERIAL.Locked = True



End Select


Exit_Form_Open:
Exit Sub

Err_Form_Open:
MsgBox Err.Description
Me.Visible = True
Resume Exit_Form_Open
End Sub



thanks for any help given

rob