Crear tablas Access con ADOX en VB

[sdnsdlm]

Tenía ADOX por los suelos, me tocó en su momento pero hacía tiempo que no lo usaba. He revisado el código que tengo y en su momento lo logré así:

Set tuColumna=new Adox.column
with tuColumna
.name="lo que sea"
' continua especificando lo que sea
properties("Default")= ... ' valor por defecto dependiendo del tipo de dato que tengas en la columna
end with
' Y ahora lo añades a la tabla que has definido
tuTabla.Columns.Appende "lo que sea"

Ya dices algo.

Saludos.