sub form correct answer adds to the number correct in main form HELP!

[Madmax]

The code I have is.

Private Sub Command26_Click()
If Forms![test site]![prp test].Form.[A Right Answer] = -1 Then
Forms![test site]![number correct] = Forms![test site]![number correct] + 1
End If
DoCmd.FindNext
End Sub

I know this is wrong but what this does starts with a button that says answer A. Then when clicked it checks a yes/no box to see if "A right Answer" is the correct yes. Then it should pop to the main form and take the number correct cell and add one to it. everytime I clikc this, nothing is happening.

Also, in this code. I am trying to get the record to go to the next record inside the subform but docmd.findnext seems to be wrong too.

Please help me out.

[June7]

FindNext method is not appropriate, need something like:

DoCmd.GoToRecord acForm, Me.Name, acNext

Have you step debugged? Follow the code as it executes, see where behavior deviates from expectations, fix, repeat.

Try = True instead of -1.

[Madmax]

Private Sub Command26_Click()
If Forms![test site]![prp test].Form.[A Right Answer] = True Then
Forms![test site]![number correct] = Forms![test site]![number correct] + 1
Debug.Print
Else
DoCmd.GoToRecord acDataForm, Me.Question, acNext
End If
End Sub

Nothing shows on debug I did this

Forms![test site]![number correct] = 1

and that showed 1 in the correct cell but I cant get it to add 1 to whatever number is there.

[Madmax]

disregard last. though nothing showed on debug, it still started working correctly, new problem is the go to record wont work for the subform. attached is code again.

Private Sub Command26_Click()
If Forms![test site]![prp test].Form.[A Right Answer] = True Then
If Forms![test site]![number correct] = 0 Then
Forms![test site]![number correct] = 1
DoCmd.GoToRecord acDataForm, Me.CurrentRecord, acNext
Exit Sub
End If
Forms![test site]![number correct] = Forms![test site]![number correct] + 1
DoCmd.GoToRecord acDataForm, Me.CurrentRecord, acNext
Else
DoCmd.GoToRecord acDataForm, Me.CurrentRecord, acNext
End If
End Sub

I dont want it to change the record on the primary form just the subform named"PRP test" the main form is named "Test site"

[Madmax]

lol I was making it too complicated, the answer was

DoCmd.gotorecord , , acnext.