Zaheer,

I see two problems with the code you posted.

1) You are not changing the ControlSource for the edit boxes only their values. This explains why you see the last value when you enter the edit box, it refreshes itself and reads the controlsources it has. Change your code so the assignments are like this;

thisform.boxmemo2.edit1.Controlsource="remarks2.remarks_a"

and folow the assignments with calls to each editbox's Refresh method as in;

thisform.boxmemo2.edit1.Refresh()

2) you have extra ENDDO's in your code as in;

DO CASE
   CASE ...
ENDDO
CASE ...
ENDDO

There should be only one ENDDO for each DO CASE construct, not for each CASE within the DO CASE.




>In form, there is four containers having edit box (container class). Each edit box has different control source. The value of these edit boxes can be changed through option control (option group buttons). In the InterActiveChange event of option group I have following codes.
>

>do case
>case this.value=1
>thisform.boxmemo2.edit1.value=alltrim(remarks2.remarks_a)
>thisform.boxmemo3.edit1.value=alltrim(remarks2.remarks)
>thisform.boxmemo4.edit1.value=alltrim(remarks1.approv_a)
>thisform.boxmemo5.edit1.value=alltrim(remarks1.approv)
>enddo
>case this.value=2
> some codes here
>enddo
>

>These codes are working well. But when I select any edit box after running the form the last value comes in the edit box. I do not want to use gotfocus in edit box. Any help please