Thread: Sub form only one entry

How to limit sub form to have only one entry?

I have construct a subform "frm_Obs1" on main form "frm_Main". I would like to write code for following condition.

1. If there is no record, I want the other user to be able to add one.

2. If there all ready is one, I want the user to be able to change it, but not add anymore. I tried unusual ways but any of them worked out. Can anybody How to limit subform to have only 1 entry? Any help.

Just try to run following code from the Current () Event of the Main Form but remember that you have to duplicate it in the Current () Event of the Sub-Form. After using this code try to run entire program and make sure whether you are able to add only one record or not.

Vb code:

Private Sub Form_Current()

With Me![frm_Obs1].Form
If .Recordset.RecordCount = 0 Then
.AllowAddition = True
Else
.AllowAddition = False
.AllowEdit = True
End If
End With
End Sub

C# code:

private void Form_Current()
{
{
if ((Me["frm_Obs1"]).Form.Recordset.RecordCount == 0)
{
(Me["frm_Obs1"]).Form.AllowAddition = true;
}
else {
(Me["frm_Obs1"]).Form.AllowAddition = false;
(Me["frm_Obs1"]).Form.AllowEdit = true;
}
}
}