Sorry, change that line to

replace (eval(loTextbox)) with Newname

>thank you,
>error message... command contains unrecognized phrase/key word
>at replace eval(loTextbox) with Newname
>
>thanks
>
>>>hi,
>>>thank you,
>>>1.error message... Function argument value, type, or count is invalid at
>>>if !empty(eval(loTextbox))
>>

>>for i = 2 to 12
>>  loTextbox="ThisForm.Text" + trans(i)+'.value'
>>  if !empty(eval(loTextbox))
>>    replace eval(loTextbox) with Newname
>>  endif
>>endfor

>>>2.what about replace
>>
>>I misread your code, I thought you wanted to change the property value.
>>
>>>
>>>thanks
>>>
>>>>Something like this

>>>>for i = 2 to 12
>>>>  loTextbox="ThisForm.Text" + trans(i)
>>>>  if !empty(eval(loTextbox))
>>>>     lcProperty=loTextbox+'.value'
>>>>     &lcProperty=Newname
>>>>  endif
>>>>endfor

>>>>
>>>>
>>>>>hi,
>>>>>thank you for help and code,
>>>>>this code under works....is there any other way to rewrite i mean new way
>>>>>

>>>>>IF (thisform.text2.Value)> SPACE(10)
>>>>>     REPLACE (thisform.text2.Value) WITH NEWNAME
>>>>>endif
>>>>>IF (thisform.text3.Value)> SPACE(10)
>>>>>     REPLACE (thisform.text3.Value) WITH NEWNAME
>>>>>endif
>>>>>IF (thisform.text4.Value)>space(10)
>>>>>    REPLACE (thisform.text4.Value) WITH NEWNAME
>>>>>endif
>>>>>
>>>>>IF (thisform.text5.Value)>space(10)
>>>>>     REPLACE (thisform.text5.Value) WITH NEWNAME
>>>>>endif
>>>>>IF (thisform.text6.Value)>space(10)
>>>>>     REPLACE (thisform.text6.Value) WITH NEWNAME
>>>>>endif
>>>>>IF (thisform.text7.Value)>space(10)
>>>>>    REPLACE (thisform.text7.Value) WITH NEWNAME
>>>>>endif
>>>>>
>>>>>IF (thisform.text8.Value)>space(10)
>>>>>     REPLACE (thisform.text8.Value) WITH NEWNAME
>>>>>endif
>>>>>IF (thisform.text9.Value)>space(10)
>>>>>     REPLACE (thisform.text9.Value) WITH NEWNAME
>>>>>endif
>>>>>IF (thisform.text10.Value)>space(10)
>>>>>    REPLACE (thisform.text10.Value) WITH NEWNAME
>>>>>endif
>>>>>
>>>>>IF (thisform.text11.Value)>space(10)
>>>>>     REPLACE (thisform.text11.Value) WITH NEWNAME
>>>>>endif
>>>>>IF (thisform.text12.Value)>space(10)
>>>>>    REPLACE (thisform.text12.Value) WITH NEWNAME
>>>>>endif
>>>>>
>>>>>

>>>>>thanks
>>>>>
>>>>>>>hi all,
>>>>>>>
>>>>>>>is there a way to convert it to vfp code
>>>>>>>

>>>>>>>for i= thisform.text1.value to  thisform.text12.value
>>>>>>> if (i)any text <>space""
>>>>>>>    REPLACE (thisform.text2.Value) WITH NEWNAME
>>>>>>>    REPLACE (thisform.text3.Value) WITH NEWNAME
>>>>>>>    REPLACE (thisform.text4.Value) WITH NEWNAME
>>>>>>>    REPLACE (thisform.text5.Value) WITH NEWNAME
>>>>>>>..
>>>>>>>..
>>>>>>>..
>>>>>>>..
>>>>>>>..
>>>>>>>    REPLACE (thisform.text11.Value) WITH NEWNAME
>>>>>>>    REPLACE (thisform.text12.Value) WITH NEWNAME
>>>>>>> ENDIF
>>>>>>>ENDFOR
>>>>>>>

>>>>>>>thanks.
>>>>>>
>>>>>>I am not sure exactly what you want to do.
>>>>>>
>>>>>>To loop through the textboxes, you might use something like this:
>>>>>>
>>>>>>

>>>>>>for i = 1 to 12
>>>>>>  loTextBox = eval("ThisForm.Text" + trans(i))
>>>>>>  loTextBox.Value = ...
>>>>>>  loTextBox.Visible = ...
>>>>>>  loTextBox.Top = ...
>>>>>>  * or whatever other property you want to change in each TextBox
>>>>>>next
>>>>>>

>>>>>>
>>>>>>REPLACE is used for fields in a table. To change the TextBox, just use the .Value property.
>>>>>>
>>>>>>If you want to REPLACE table fields, where do you have the name of the fields, and the values?