FoxPro/Visual FoxPro - Agregar columnda usando for

Hola amigos, por favor, necesito de su ayuda para un prg que estoy generando, la idea es la siguiente:
crear una tabla mediante una consulta,la tabla se llamara tabla1, luego a esta misma agregarle dos solumnas llamadas columa,columb; luego mediante un for agregar mas columnas hasta que termine el ciclo del for; asi:

select * from tabla into table tabla1
alter table tabla1 add column columa char(1) add column columb char(1)
for a=0 to 3
b=allt(str(a))
*****linea de addi
add column colum+ b n(1)
next I
close data

he intentado de varias formas de add, asi:
*****linea de addi
alter table tabla1 add column colum+ b n(1)

y por ahi vi un codigo de add asi:
*****linea de addi
"add column colum"+ b +"n(1)"

Pero ninguno se ejecuta correctamente, no cumplen con agregar las columas como lo requiero.

por favor, alguien me podria ayudar?

prueba esto:

CREATE TABLE TABLE1 (X C(1,0))
FOR _gir=1 TO 10
_Nfld=STRTRAN(STR(_gir,2,0)," ","0")
_Xcmd="ALTER TABLE tabla1 ADD COLUMN COLUMN"+_Nfld+" n(1,0) "
&(_Xcmd)
ENDFOR
CLOSE TABLES ALL

recordate que debes tener acceso exclusivo a la tabla1!!!