RE: Programatically placing text boxes on a form - continued

This one even provides a working version :=)

*********************************** nStartRow = 10 nStartCol = 10

For nCol = 1 To 4 For nRow = 1 To 10 cTextBoxName = "TextBox" + Trans(nCol) + Trans(nRow) Thisform.AddObject( cTextBoxName, "textbox")

With Thisform.&cTextBoxName .Left = nStartCol + ((nCol-1) * 110) .Top = nStartRow + ((nRow-1) * 24) .Width = 100 .Value = "Cell " + Trans(nCol) + ", " + Transform(nRow) .Visible = .T. Endwith Endfor Endfor ***********************************