Hola a todos primeramente este es el procedimiento insertar dentro de un evento de un boton.
Private Sub Insertar_Click()
Dim StringSql as String
StringSql ="Insert Into MiTabla(campo1,campo2,campo3)values "
StringSql = StringSql & " (' " & TextBox1 &" ' , ' " & TextBox2 & " ' , ' " & TextBox3 & " ' )"
Currentdb.Execute StringSql
End Sub
Cualquiera duda o pregunta enviarme un E-Mail y luego estare publicando su respuesta.
|