Hola;
Supongo que te refieres a un TextBox.Text. Y la conección mediante data.
Para aprenderlo esta bien, pero para usarlo utiliza mejor SQL, Lenguaje de Consulta Estructurado.
Mira es tan fácil como lo siguiente:
En Proyectos \ Referencias\ escoje Microsoft DAO 3.51 Object Library
En declaración General:
Option Explicit
Dim db As Database
Dim a As String
Dim valor As String
dispones de 1 Form, 1 TextBox y 1 commadnButton.
Form1.Name = frmIngreso
TextBox1.Name = txtIngreso
commandbutton.Name = cmdIngreso
Private Sub cmdIngreso_Click()
'Dirección de la base de datos
a = "c:\MiAplicacion\Bases\MiBase.mdb"
'Abrir la base de datos
Set db = OpenDatabase(a)
valor = txtIngreso.Text
'Ingresar el valor hacia la base de datos
db.Execute "INSERT INTO Tabla1 (Nombre) VALUES ('" & valor & "')"
db.Close
End Sub
Si te convence postea para realizar otras cosillas.
Nos vemos. |
