Resuming program execution after a modal window

[dccjr]

I have multiple queries in a Sub located in a public module. Below is one of these query sections. I have inserted comments as to what I would like to happen. I just can't figure out how to resume after each section, if necessary. I am not sure if this can even be accomplished, since modal windows stop program execution.

strIDInfoSQL = "SELECT * FROM IDInfo1 WHERE PartNo = '" & strHomePartNo & "';"
Set rsIDInfo = CurrentDb.OpenRecordset(sqlIDInfoSQL)
If rsIDInfo.RecordCount > 1 Then
    DoCmd.OpenForm "MultipleRecordNotice", acNormal
    Forms!MultipleRecordNotice!cbxRecordSelect.RecordSource = strRecordFindSQL

'NEED TO REQUERY BASED ON SELECTION MADE IN THE COMBO BOX IN THE MODAL WINDOW/FORM "MultipleRecordNotice"

Else
    With rsIDInfo
        Forms!DisplayForm!tbxDisWPS = rsIDInfo.WPSNo
        Forms!DisplayForm!tbxDisRev = rsIDInfo.Revision
        Forms!DisplayForm!tbxDisApprovalDate = rsIDInfo.ApprovalDate
        Forms!DisplayForm!tbxDisPQR = rsIDInfo.PQRNo
        Forms!DisplayForm!tbxDisPartNo = rsIDInfo.PartNo
        Forms!DisplayForm!tbxDisApproval = rsIDInfo.Approval
    End With
End If
.
.  'NEED TO RESUME HERE
.

[pbaldy]

Presuming code execution is stopping while the form is open (I use the acDialog argument in OpenForm), it will resume if the form is hidden or closed, so a requery at the point of your comment should work.

[pbaldy]

Oh, but of course you'll have to find a different way of setting the record source, since that line won't be firing until the same point. I'd probably use OpenArgs.