Alter table issue

[cs211024]

Hi forks, I know that in Access design view we can alter table column design, but how to get it by using VBA code?

If in table1, the data type of [cloumn1] is Number, [cloumn2] is Currency, [cloumn3] is Date, can I write:

********************************
Dim dbs As Database
Set dbs = CurrentDb()

dbs.Execute "ALTER TABLE [table1] " _
& "COLUMN [cloumn1] Number, [cloumn2] Currency,[cloumn1] Date;"
********************************

Thanks