Slight Adjustment needed in Combo Box

[Bob]

I have Completed everything but the after update code for my combo box, It
works when the owner only has one horse, but when i select a owner who has
multiple horses no matter which one of his horses i select i only get the
one horse every time, It is working when one owner only owns one horse so i
cant be that far away,

Private Sub cbOwner_AfterUpdate()
If cbOwner.Text = "" Or IsNull(cbOwner.Text) = True Then
Exit Sub
End If
DoCmd.FindRecord val(cbOwner.value), , True, , True, acAll, True
Me.Filter = "OwnerID=" & val(cbOwner.value)
Me.FilterOn = True
End Sub

This is the SQL from my Query:
SELECT qHorseNameSourceModifyMode.HorseID,
qHorseNameSourceModifyMode.Expr1001, QryOwnerHorsePercent.OwnerPercent,
qHorseNameSourceModifyMode.HorseID, QryOwnerHorsePercent.OwnerID,
tblOwnerInfwnerTitle, tblOwnerInfwnerFirstName,
tblOwnerInfwnerLastName, tblOwnerInfwnerAddress
FROM (qHorseNameSourceModifyMode INNER JOIN QryOwnerHorsePercent ON
qHorseNameSourceModifyMode.HorseID = QryOwnerHorsePercent.HorseID) INNER
JOIN tblOwnerInfo ON QryOwnerHorsePercent.OwnerID = tblOwnerInfwnerID
ORDER BY qHorseNameSourceModifyMode.Expr1001;

Thanks if someone can steer me in the right direction.....Bob