This may be where the problem is.
I am using a combo box which is selecting a record based on a value i select. This is from tblclient
Private Sub cboSelectClient_AfterUpdate()
DoCmd.SearchForRecord , "", acFirst, "[ClientLearnerNum] = " & Str(Nz(Screen.ActiveControl, 0))
End Sub
So...