You can use code :
Docmd.runsql "Alter table tblXXX add column fieldxxx text(20)"
you substitute the table name and field name as needed.
or
Docmd.runsql "Alter table tblxxx add colunn fieldxxx number"
For more ifo, please look at help for ALTER TABLE