Form Open Events and error trapping

[Middlemarch]

I'm trying to track down why a function is running 4 times before my main form opens.




I understand the first event to fire is Form Open, so a Stop there should stop before anything else ?


The function is called by the query that is the recordsource for the Main Forms subform.
A Debug.print command in that Function is printing twice before the STOP command (first line of Main Form Open event).


That doesn't seem possible if the first event is Form open, so something else is happening first?


Any idea what ?

[June7]

If you call a function from a query, I expect it would be called for each record.

Subforms load before main form.

[Middlemarch]

Thanks @June7 some things to take into account.
The subform has up to 60 records and function is only firing twice.
It may be called once for subfom loading, then again for the first record?

[June7]

Okay, maybe not 60 times right off the bat.

Possibly. Try Debug in each form's Load and Current events.

[Micron]

Data related code should go in form load event IMO. I wouldn't be surprised that if on form opening, the query manages to retrieve 2 or so records before hitting the stop line. Code branching can cause certain events to repeat (e.g. because of Requery) or even get cancelled. You might want to try stepping through the code right at the form open event and watch the sequence of events. Or create a db copy, compact/repair and zip it and post it here so we can watch the sequence.

[Middlemarch]

As the subform loads first, and it's Open event fires first, a STOP there you'd expect to happen before anything else. But it doesn't.

Function ShowImage() As String
    Debug.Print "ShowImage" ': Stop
    On Error Resume Next
        Dim vPic As Variant
        If IsThisFormLoaded("frmMain") = True Then
            vPic = gFindFiles(CurrentProject.path & "\Images", Forms!frmMain!cboCode & ".bmp", False)
            If UBound(vPic) > 0 Then ShowImage = vPic(1)
        End If
    On Error GoTo 0
End Function

It's recordset query runs and debug prints it's function name twice. I'd just like to know why it does it twice. (Actually it used to do it 4 times but I seem to have changed that to 2 at the moment).
To Step through events to see what's happening, where might a Stop go to be the very first thing Access does ? Or is this not possible, Access is doing stuff before any procedure starts?

[orange]

How big is this database? Can you post a copy with a subset of records that show this problem?

[June7]

Is this really a problem?

I've never used Stop for debugging. Just breakpoints, Debug.Print, and stepping.

So I just tested a Stop in form Open event and used that form as subform. The Stop works.

[Middlemarch]

@June, did you call a function from your subforms recordsource.?
If yes, how many times did it run before reaching Form Open event?
I've never used breakpoints, only Stop.
You're probably right, this isn't a problem but knowing how to stop anything running when a For opens (then seeing what happens next) could be useful.
@orange - still attempting subset example.