FOR i=1 to 4 > STORE <i>something to store</i> TO ('thisform.txtBox'+ALLTRIM(STR(i))+'.Value') >ENDFOR