replacing data a subsheet

[JBurlison]

so im trying to replace some data on the subsheet on its current record, on update of a combo box i want to update a race number.

Private Sub Race_Number_AfterUpdate()

Dim Racenumber As String
Dim Current As String


Racenumber = ""
Current = ""

Racenumber = Forms![Stats]![Race Number]
Current = 'the subform is "substats" the field is "race number".

Current = Racenumber

End Sub

 

[KenHigg]

Current = forms!!stats!substats.form![race number]

Provided substats is the name of the subform control on the main form.