añadir un registro con visual basic 2008

[fugasfugas2]

Private Sub Form1_Load(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles MyBase.Load


' Creamos el conjunto de datos
ds = CreateDataSetOleDb("Provider=Microsoft.ACE.OLEDB.1 2.0;" & _
"Data Source=C:\circulo.accdb", _
"SELECT id,nombre, direccion, telefono FROM clientes", _
"clientes")

If ds Is Nothing Then Exit Sub

bmb = Me.BindingContext(ds, "clientes")

' Procedemos a enlazar los controles de texto
Label2.DataBindings.Add("text", ds, "clientes.nombre")
Label4.DataBindings.Add("Text", ds, "clientes.direccion")
Label6.DataBindings.Add("Text", ds, "clientes.telefono")
Label7.DataBindings.Add("text", ds, "clientes.id")
Label9.Text = bmb.Count

' Actualizar
With bmb
.Position = .Count
.Position = 0
End With

asi lo estoy haciendo asi tienes una idea no es un control como ves lo estoy haciendo todo a base de codigo