Enable=False if key field is Null

[Tom via AccessMonster.com]

Hi,
I put some code in my subforms on current event to check if the foriegn key
field contains a null value. If it does I dont want the user to be able to
enter anything into the forms fields. Because to do that you would of course
want a record in the parent. The parent table is Agen. The linked field is
AgenID. The other table (the one that makes up the subform) is AgenContact.
This is the code;

Private Sub Form_Current()
If IsNull(Me.[AgenID]) Then
Me.AgenContactFirstName.Enabled = False
Me.AgenContactFirstName.Locked = False
End If
End Sub

In order to disable all the controls on the form would I have to list them
all in the code and set Enabled to false? Another control on the form would
be AgenContactLastName. Is there some code I could put into the AgenID field
to check if it has changed (ie. someone clicked the record selector and moved
to a record that has a entry in AgenID)?

Thanks,
Tom

 

[Arvin Meyer [MVP]]

Have a look on my website at a sample of LockIt code:

http://www.datastrat.com/Code/LockIt.txt
--
Arvin Meyer, MCP, MVP
Microsoft Access
Free Access downloads
http://www.datastrat.com
http://www.mvps.org/access

 

[tomanddani via AccessMonster.com]

Thanks,
That looks easier.
Tom

Have a look on my website at a sample of LockIt code:

http://www.datastrat.com/Code/LockIt.txt
--
Arvin Meyer, MCP, MVP
Microsoft Access
Free Access downloads
http://www.datastrat.com
http://www.mvps.org/access

Hi,
I put some code in my subforms on current event to check if the foriegn key

[quoted text clipped - 19 lines]

Thanks,
Tom