Visual Basic - CREAR CAMPO EN BD

Buenos dias.

Tengo una base de datos creada en Access y una aplicacion en Visual Basic, deseo crear un campo en una tabla en concreto desde la aplicacion de Visual. Alguien me podria decir como se crearia y como averiguar si ya existe ese campo???,.

Un saludo

buscar si la tabla existe

Public Function BUSCAR_tabla(CONECCION As ADODB.Connection, Wnombre As String) As Boolean
Dim rsTABLAS As New ADODB.Recordset

Set rsTABLAS = CONECCION.OpenSchema(adSchemaTables)
With rsTABLAS
BUSCAR_tabla = False
Do While Not .EOF
If UCase(Wnombre) = UCase(rsTABLAS("table_name")) Then
BUSCAR_tabla = True
Exit Function
End If
.MoveNext
Loop
End With
End Function

buscartabla (nombredelaconeccion, "nombre de la tabla que buscas")
si la encuentra te devuelve verdadero


para agregar un campo la sentencia es la ste

"ALTER TABLE nombre_tabla ADD nombre_campo tipo"

tipo puede ser date, integer, text, double, etc

espero que te sea util, cualquier cosa me avisas al mail