how to write VBA code in A form to check whether B form is open or not, if yes, refresh B form, if not, exit, I tried many ways, but always error happen, I can done refresh parts, but "how to check Bform is open or not" always has error, I'm new, Thanks for help

You may need to do some error handling here. It is okay if there are errors if you handle them properly.

For example, if you use:

On Error Resume Next

at the beginning of your code to check for form B, then check the value of the error, like:

If Err <> 0 Then
...

This is the case where the form is not open. If Err = 0, then there was no error and the form was open. If you know the exact error value, like -24000789 etc, then you can just check for the value.

Remember to reset the Err value with Err.Clear after each routine.

Does this help?

mmcdonal

mmcdonal, thanks for your help. I think my function is not right. can you check for me. Thanks

Private Sub Form_Close()

If OpenForm.[FRM Order] = True Then <--------- something wrong at here
    If Error <> 0 Then
        Forms![FRM Vendor].Refresh
        DoCmd.Close [FRM Vendor]
        Else
        Forms![FRM Order].Refresh
    End If
End If
End Sub