>Thanks Vladimir. I have solved this problem.Now I am putting to you another two questin.
>In a form Label1=acno ,label2=name.And have text1,text2 corresponding text. I want to automatically put Name in the Text2. In prg we use this type of code:
>

>mno=0
>@10,12 say "acno" get mno
>read
>use mbal
>index on acno to mn
>seek mno
>if found()
>@14,12 say name
>endif
>
>

>mbal.dbf has acno and name unique. How I can have same in a form?
>
>Chandan

mno=0
@10,12 say "acno" get mno
read
use mbal
index on acno to mn
seek mno
if found()
   @14,12 say name
   ThisForm.Text2.Value = mbal.Name
endif