DIMENSION AO_Controls[1] && Array of TextBox/Control Object references. N_Controls = 0 && TextBox/Control counter.In the .Init() Event of your TextBox (sub)class, do the following:
WITH THISFORM .N_Controls = .N_Controls + 1 DIMENSION .AO_Controls[ .N_Controls ] .AO_Controls[ .N_Controls ] = THIS ENDWITHLater on, you can iterate thru your "textbox list" as follows:
FOR EACH O_TextBox IN THISFORM.AO_Controls WITH m.O_TextBox ... ENDWITH NEXT