>Dear Experts
>
>The following command works fine
>Thisform.container7.Top=Thisform.shape4.Top
>
>and this command does not work
>Thisform.container7.Top=Thisform.container1.shape4.Top
>
>How to put container7.top as the top of container1.shape4's top
>
>Please help
Thisform.container7.Top=Thisform.container1.Top+Thisform.container1.shape4.Top
Thisform.container7.Top=OBJTOCLIENT(Thisform.container1.shape4,1)