I'm glad it works. I think you can move this code to the Init of the form and get rid of ThisForm.lFirstTime.
>Sergey,
>I've tried that. The following seems to work in the activate but I want to just use the Activate
>
>If ThisForm.lFirstTime
> For Each oControl In Thisform.Controls
> If Upper( AllTrim( oControl.Class ) ) == "COMBOBOX"
> oControl.Selected[1] = .T.
> EndIf
> EndFor
> ThisForm.lFirstTime = .F.
>EndIf
>
>It turns out the Value propert works after all. I must have set other properties which caused that to fail.
>
>
< SNIP >
--sb--