for i = 1 to 10
   lcName = "text" + transform( i )
   this.AddObject( , "textbox" )
   loControl = eval( lcName )
   with loControl
      .Top = i * ( .Height + 5 )
      .Visible = .t.
   endwith
endfor