What have you got on the form itself? The names of the objects would be helpful too.

hmm got it half-fixed:

sub form_load()
const n=15
dim Sam(n) as textbox
for a=1 to 15
sam(n).text="SamY"
next a
end sub