VB.Net conectado a access, textbox = campo

[robertgustavo]

los TextBox tienen la propiedad "Databindings" y podemos conectarlo a un dataset o a un bindingSource. siempre especificando el nombre del campo que mostrará.

'Creamos en BindingSource
Dim Bs As New BindingSource
dim ds as new dataset
try
dataAdapter.Fill(ds, "categorias")
Bs.DataSource = ds.Tables("categorias")
Me.GridCategorias.DataSource = Bs
Catch ex As Exception
msgbox(ex.toString())
End Try

'conectamos los Textbox
Private sub Conectar()
' "Text", no cambia., bs es el binding, y lo que sige es el nombre del campo
Me.Txtcodigo.DataBindings.Add("text", Bs, "cod_cat")
Me.TxtNombre.DataBindings.Add("text", Bs, "nom_cat")
end sub