Exit From From Form Load Event

I know, why bother going to the form if you are going to exit in the 'Load' event.  The situation is that the user has multiple paths to get to this form.  One of the paths passes openargs which specific a filter for the records to be shown on the form.  In some cases no records match the specified filter.  when that happens I want to exit the form immediatelya after letting the user know that no records matched.  An EE'er provide me a way of knowing if no records matched and it works well. The logic is in the 'Load' event shown in the code snippet.  it seems to work well, I get the message that no records matched.  I show the message, set the zerorecordsfound flag, close the form and exit the sub.  it all seems to work.  The line 'Update_Form_Controls Me' is not executed if zero records are found.

Here's the part that I don't understand.   The form seems to continue to execute because I end up in the 'Current' event (I'm not sure why).  Since I want to exit the form I put logic in the front of the "current' event  to recognize that zero records were found and exit the 'Current' event. That logic is also posted in the snippet.

Here is the truly confusing part.  I put breakpoints in the code after the staement 'ZeroRecordsFound = True', which is encountered when the records are zero.  At the breakpoint, the value of 'ZeroRecordsFound' is True.

I also put a break point at the top of the 'Current' event.  At that point the value of 'ZeroRecordsFound' is false.  How is this possible?  How in the world is it possible that the value of 'ZeroRecordsFound'  is True in the Load event, never reset or changed yet is false at the start of the 'Current' event.

In case it matters, the form is 'frmInvoice_main' which contains subform 'frmInvoice_sub'.

How can I get out of this form gracefully if no records match the filter?

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:

Option Compare Database
 
Option Explicit
 
Dim ZeroRecordsFound As Boolean
 
Private Sub Form_Load()
'
ZeroRecordsFound = False
'
If Not IsNull(Me.OpenArgs) Then
    Me.Filter = "[AutoNumID] = " & OpenArgs
    Me.FilterOn = True
    If Me.RecordsetClone.EOF Then
         MsgBox "No Matching Record(s) Found"
         ZeroRecordsFound = True
         DoCmd.Close acForm, Me.Name   'close the form
         Exit Sub
    End If
    
Else
'    Me.Filter = ""
    Me.FilterOn = False
End If
'
Update_Form_Controls Me
'
End Sub
 
Private Sub Form_Current()
'
If ZeroRecordsFound Then
    Exit Sub
End If