Visual Basic - Agregar registro(Principiante)

Hola a todos.
Estoy haciendo un proyecto para la escuela de lo basico ALTAS,BAJAS,CAMBIOS y CONSULTAS y me gustaria saber como puedo hacer un boton de AGREGAR y BORRAR REGISTROS. Estoy utilizando una base de datos en ACCES y una sola tabla. En la tabla tengo un campo ID pero es autonumerico Yo tengo este codigo de para el boton de agregar y no hace lo que yo quiero , que es que se ponga en blanco cada campo para agregar un nuevo registro. Un saludo y Gracias.

Private Sub Nuevo_Click()
Dim n As Integer
For n = 0 To Controls.Count - 1
If TypeOf Controls(n) Is CommandButton Then
Controls(n).Enabled = True
End If
Next n
End Sub

No entiendo bien tu pregunta, pues cuando usas la sintaxys
Estos es para incluir en la tabla
With Tabla
.Addnew
.Fileds(0).Value=Controls(n).Text
'Asi para cuantos Controls tengas
.Update
End With

Pero si lo que quieres es poner los Controls en blanco, pues escribe, despues del Controls(n).Enabled, Controls(n).Text=""

en el codigo que muestras, estas habilitando unos botones de comando, pero no hace nada respecto a una base de datos, para ayudarte es necesario menciones que Access usas (97,2000,XP), como estas accediento a tu base de datos, con los controles Data DAO o ADO, con codigo directamente, te sugiero ser mucho mas explicito...

en el codigo que muestras, estas habilitando unos botones de comando, pero no hace nada respecto a una base de datos, para ayudarte es necesario menciones que Access usas (97,2000,XP), como estas accediento a tu base de datos, con los controles Data DAO o ADO, con codigo directamente, te sugiero ser mucho mas explicito...

Para agregar un registro basta con que utilizes el control data
y en un boton de comando o donde quieras que se ejecute la intruccion
escribe las siguientes lineas:

para agregar registros

Private Sub cmdaddreg_Click()
text1.setfocus
data1.recordset.addnew
End Sub

y para borrar

Private Sub cmddelreg_Click()
data1.recordset.delete
data1.recordset.movenext
End Sub

Para agregar un registro basta con que utilizes el control data
y en un boton de comando o donde quieras que se ejecute la intruccion
escribe las siguientes lineas:

para agregar registros

Private Sub cmdaddreg_Click()
text1.setfocus
data1.recordset.addnew
End Sub

y para borrar

Private Sub cmddelreg_Click()
data1.recordset.delete
data1.recordset.movenext
End Sub
ojala te sirva este ejemplo
un saludo