Duplication of append/requery results in subform

[dxlujan]

I have created a questionnaire that contains the participant's information on the main form, and the questions/answers on the subform. A button (on click event)populates all questions, each with a dropped down box for a selected answer. Since this form will be updated by a data entry user, how can I prevent the code from running multiple times if the button is clicked more than once. Currently, if I click the button once, the procedure works fine. If I click again, the same data is appended to the subform. I think I need to use some type of If/Then statement, but unsure how, since I am a newbie of VB. Can anyone help in laymen's terms????

[BHo15]

I'm not completely sure I understand your set-up, but here is a stab.

If the button is on your main form, and the populated answers are populated on the sub form, you could use something like this...

Private Sub Button1_Click
 
If Forms!MainFormName!SubFormName.Answerfield<>"" ThenExit SubElsePerform the code you have writtenEnd If
 
End Sub

And by the way... Welcome to Bytes!

[dxlujan]

Thank you for your quick response, unfortunately it did not work. I received a run time error. Instead I used this:

If Me.sfrmRespAnswr.Form.RecordsetClone.RecordCount = 25 Then

Exit Sub

Again thank you so much!

[BHo15]

Glad you figured it out. Congrats!