Retreive Blank Form upon Record Entry

[michael.legge@rbc.com]

I have code that is executed with the click of a button to enter a new response using 2 fields to differentiate the records: a combobox "cboSrvID" and a textbox "RspnsName". I have a different set of questions for each value in the cboSrvID. Upon selecting my button the record is saved correctly although I would like it to open the blank form associated on the subform "sfrmSurveyResponses" when pushed. I have tried some DoCmd.FindRecord and DoCmd. GoTo functions to try and retreive the last acLast RspnsID inputted. So far I have had no luck.

Does anyone have any suggestions? I wish I could post the database but it is fully populated with confidential data. If further clarification is needed I will do my best to explain.

Any help would be greatly appreciated.



Below is the code for the onClick action of my button.

Thank you

Private Sub cmdEnterResults_Click()
    DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
    DoCmd.SetWarnings False
    DoCmd.OpenQuery "qappNewResponses"
    Me![sfrmResponses].Requery
    
    End Sub

[June7]

Are you using a form/subform arrangement? Master/Child links properties of subform container control will synchronize the parent and related child records of the mainform and subform.

[michael.legge@rbc.com]

Yes it is a form/subform arrangement. I have the forms synchronized with the RspnsID a primary key generated by Access for every new entry.