Thanks.
I checked
* The AllowEdits Property of the Form is set to False /
No. It's Yes.
*The RecordSource of the Form is a updateable Query.
*The Control is a not a Calculated Control, it's a check
box.
The only thing I suspect is : the control I'll assing a
value for is on another loaded form.
Here is my code:
Private Sub btnClose_Click()
On Error GoTo btnClose_Click_Err
Dim Answer%
' check to see if all of the donors are entered, if
so set flag on frmDisclosureFilingEntry
Answer = MsgBox("Are all major donors entered?", 36,
CnDb)
If Answer = 6 And Isloaded
("frmDisclosureFilingEntry") Then Forms
("frmDisclosureFilingEntry")!DonorsIn = True
DoCmd.Close A_FORM, "frmDonorEntry"
If Isloaded("frmViewSchedules") Then Forms
("frmViewSchedules").SetFocus
btnClose_Click_Exit:
Exit Sub
btnClose_Click_Err:
MsgBox "Error: " + Error$, 0, "btnClose_Click"
Resume btnClose_Click_Exit
End Sub
When I use debug, it stopped at line:
Then Forms("frmDisclosureFilingEntry")!DonorsIn = True
Error message: you cannot assign value to this object.
Thanks in advance for any suggestions
Ann