OpenForm command...

[Kurt Blom]

Hi all,

In my current project, I open other forms from within my 'Parentform'.
In this parentform, dates of the selected forms are queried. Each time,
the parentform (frmParentForm) is minimized (DoCmd.Minimize) when a
'subform' is openend. When the report for the specific date is
completed, I close the subform by a close button:

Private Sub btnClose_Click()
On Error GoTo Err_btnClose_Click

DoCmd.Close
DoCmd.OpenForm "frmParentForm", acNormal (**)

Exit_btnClose_Click:
Exit Sub

Err_btnClose_Click:
MsgBox Err.Description
Resume Exit_btnClose_Click

End Sub

When the parentform is shown again, the last report date is not yet
displayed. How can I easily refresh the parentform after it is opened? (**)

Thanks in advance,

Kurt.

[Paul]

Why not just set the controlsource (query) for the subform to have the date
from the parentform as the criteria:
in the query criteria enter:

[forms]![parentformname]![datefieldname]

or if you have 2 dates

between [forms]![parentformname]![STARTdatefieldname] &
[forms]![parentformname]![ENDdatefieldname]

Then close or hide the parent form when the subform opens.

HTH
Paul

"Kurt Blom" <Ku*******@UGent.be> wrote in message
news:cm**********@gaudi2.UGent.be...

Hi all,

In my current project, I open other forms from within my 'Parentform'. In
this parentform, dates of the selected forms are queried. Each time, the
parentform (frmParentForm) is minimized (DoCmd.Minimize) when a 'subform'
is openend. When the report for the specific date is completed, I close
the subform by a close button:

Private Sub btnClose_Click()
On Error GoTo Err_btnClose_Click

DoCmd.Close
DoCmd.OpenForm "frmParentForm", acNormal (**)

Exit_btnClose_Click:
Exit Sub

Err_btnClose_Click:
MsgBox Err.Description
Resume Exit_btnClose_Click

End Sub

When the parentform is shown again, the last report date is not yet
displayed. How can I easily refresh the parentform after it is opened?
(**)

Thanks in advance,

Kurt.