Private Sub Actualizar_Click()
Dim StringSql as String
StringSql ="Update MiTabla set "
StringSql = StringSql & " (Campo1=' " & TextBox1 &" ' ,Campo2= ' " & TextBox2 & " ' , campo3= ' " & TextBox3 & " ' )"
Currentdb.Execute StringSql
End Sub
Cualquiera duda o pregunta enviarme un E-Mail y luego estare publicando su respuesta.
|