Visual Basic - Impresion de datos en text box

Hello, como hago para que los datos de una tabla de access se impriman automaticamente en text boxes? Por ejemplo, elejir un dato desde la base de datos y que enseguida la direccion aparesca en el text box direccion, el nombre el el text box de nombre ect. He tenido muchos problemas haciendo eso.

Gracias

Set db2 = Workspaces(0).OpenDatabase(App.Path & "\TABLAS\seguridad.MDB")

Set tabusu = db2.OpenRecordset("select * from usuario where [usuario].[cedula] = '" & cedusu & "' ")

If tabusu.RecordCount <> 0 Then
With tabusu
cedusu.Text = .Fields("cedula")
nomusu.Text = .Fields("nombre")
fecusu.Mask = .Fields("fecha")
edausu.Text = .Fields("edad")
End with
else
msgbox " no enconto cedula, no puede mostar en los txtbox.tex "
end if

----
nota: abre la base de datos (en access) , luego haz la consulta sql.
zure