>I placed

Thisform.oPrevControl = IIF(TYPE("Thisform.ActiveControl") = "O" AND NOT ISNULL Thisform.ActiveControl),Thisform.ActiveControl,This.Parent.txtValue)

in the When event of the checkbox.
>
>Thank's for the solution and have a nice weekend.

You're welcome and've nice weekend too.