Visual Basic - captura de datos en visual basic

hola por favor nesesito informacion para capturar los datos el visual.
quiero que cuando ingrese un nombre quede en la base de datos

gracias por su ayuda

crea en un modulo:
Public Cn As ADODB.Connection 'Objeto para la coneccion a la BD

Public Sub Abrir_Cn()
Set Cn = New ADODB.Connection
Cn.Open "DRIVER={Microsoft Access Driver (*.mdb)};" & _
"DBQ=" & "C:\ubicacion de tu archivo.mdb;" & _
"DefaultDir=;UID=;PWD=;"
End Sub

Public Sub Cerrar_Cn()
Cn.Close
End Sub

crea un formulario:
esto en el area de declaraciones

Option Explicit
Dim Rs As ADODB.Recordset

esto es para comprobar si la conexion es buena

Private Sub Form_Load()
Abrir_Cn
Set Rs = New ADODB.Recordset
End Sub

crea un textbox y un boton:

Private Sub Command1_Click()
Rs.open "Select * from tabladela base de datos",Cn,adOpenStatic,adLookOptimistic,adCmdText
Rs.AddNew
if not Rs.Eof then
Rs.fields("Nombre del campo de la tabla")=text1.text


Rd.Update
end if
Rs.Close

End Sub

mira porque no buscas en el evento keypressed del option button y coloca ahí:

Private Sub Option1_KeyPress(KeyAscii As Integer)
Rs.open "Select * from nombre_table", Cn, adOpenStatic, Adlookoptimistic, adcmdtext
Rs.Addnew
If Not Rs.EOF Then
Rs.fields("campo de la tabla") = text1.Text

Rs.Update
End If
Rs.Close
End Sub

---ahi seria muy util

Este tio esta locaso!!!!