informes de datos en visual basic

Creación de la base de datos
1) abrimos Microsoft Access, ponemos el nombre de la base ha ser creada, click en crear
2) Creamos las tablas deseadas después guardamos las tablas creadas

3)Procedemos a llenar los datos correspondientes en cada tabla




4) Procedemos a realizar las relaciones entre las tablas

5) Procedemos a guardar la base de datos

Creación del ODBC
1)Abrimos panel de control en herramientas administrativas i seleccionamos orígenes de ODBC
2) Damos click en orígenes de datos ODBC y seleccionamos agregar




3) Seleccione el controlador MicrosoftAccess driver (*mdb.*accdb) y damos click en finalizar








4) Ponemos el nombre del origen de datos que creamos









5) Damos click en seleccionar y buscamos la base dedatos que creamos

















6) Damos click en aceptar para guardar el ODBC creado















Creación del MINI-PROYECTO
1) Programación de ingreso deregistros

Ingresos de categoría
Private Sub Command1_Click()
Adodc1.Recordset.AddNew
Adodc1.Recordset.Fields("Codigo") = Text1
Adodc1.Recordset.Fields("Categoria") = Text2
Adodc1.Recordset.Update
EndSub
Ingresos de película
Private Sub Command4_Click()
Adodc1.Recordset.AddNew
Adodc1.Recordset.Fields("codigo") = Text1
Adodc1.Recordset.Fields("Nombre de lapelicula") = Text2
Adodc1.Recordset.Fields("Costo") = Text3
Adodc1.Recordset.Update
End Sub











Programación de actualizaciones de ingresos

Actualizacionesde categoría

Private Sub Command1_Click()
Text1.Enabled = True
Text1 = ""
Text1.SetFocus
End Sub

Private Sub Command2_Click()
Text2.Enabled = True
Text2 = ""
Text2.SetFocus
End SubPrivate Sub Command4_Click()
Adodc1.Recordset.Fields("Codigo") = Text1
Adodc1.Recordset.Fields("Categoria") = Text2
Adodc1.Recordset.Update
End Sub

Actualizaciones de Película

Private Sub...