Ingeniero

Creación de un nuevo proyecto

Renombramos el formulario inicial a frmMenu

Agregaremos un nuevo objeto, haciendo clic derecho en el nodo del proyecto, agregar, nuevo elemento.

Agregaremos una base de datos basada en servicios, que es un archivo de SQL Server con el nombre dbControlVehiculo.mdf

Se creará un conjunto de datos (DataSet)

Le asignaremos el nombredbControlVehiculoDataSet y la extensión que se le asignará es .xsd

Procedemos a crear las tablas que utilizaremos, abrimos el nodo de la base de datos y clic derecho en la carpeta tablas, agregar nueva tabla

Definimos los campos de la tabla autos, su llave primaria sería cod_auto y guardamos

Definimos los campos de la tabla motoristas, su llave primaria sería cod_motorista y guardamos

Definimoslos campos de la tabla reservas, su llave primaria sería num_reserva y guardamos

Ahora diseñaremos el dataset de forma visual, hacemos doble clic en el archivo xsd (dataset)

Arrastramos cada tabla desde la base de datos en la sección de explorador de servidores hasta el dataset

Definiremos las relaciones entre tablas arrastrando el índice único de la tabla autos hasta el campocod_auto en la tabla reservas y nos aparecerá el asistente de relaciones

Y nos aparecerán las tablas ya enlazadas

Hacemos el mismo proceso para la tabla motorista, el índice único de motorista se arrastra al campo cod_motorista de la tabla reservas

Procedemos a crear un formulario para el mantenimiento de cada tabla

El formulario para la tabla autos (frmAutos.vb)

El formulario parala tabla motoristas (frmMotoristas.vb)

El formulario para la tabla reservas (frmReservas.vb)

Abrimos el formulario frmMenu para agregarle 3 botones que accederán a los otros formularios

En el panel de propiedades cambiamos 2 propiedades de cada botón:
OBJETO PROPIEDAD VALOR
Button1 Name btnAutos
Text AUTOS
Button2 Name btnMotoristas
Text MOTORISTAS
Button2 Name btnReservasText RESERVAS

Quedará de la siguiente manera

Accederemos a cada botón y agregaremos la función ShowDialog() para mostrar los formularios, al final el código quedará de la siguiente manera
Public Class frmMenu
Private Sub btnAutos_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAutos.Click
frmAutos.ShowDialog()
End Sub

Private SubbtnMotoristas_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnMotoristas.Click
frmMotoristas.ShowDialog()
End Sub

Private Sub btnReservas_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnReservas.Click
frmReservas.ShowDialog()
End Sub
End Class

Abrimos el formulario frmAutos y abrimos el nodo de latabla autos en el dataset del panel orígenes de datos

Desplegamos el menú de combo de la tabla autos y seleccionamos “detalles”

Luego la arrastramos y lo soltamos en el formulario, esto nos generará los campos para la manipulación de datos

Luego borramos el objeto BindingsNavigations que se creó en la parte superior del formulario

Agregaremos 7 botones para el manejo de los datos yles asignaremos valores a las siguientes propiedades
OBJETO PROPIEDAD VALOR
Button1 Name btnPrimero
Text
Button4 Name btnUltimo
Text >>
Button5 Name btnNuevo
Text Nuevo
Button6 Name btnGuardar
Text Guardar
Button7 Name btnBorrar
Text Borrar


Luego modificamos cada botón para que contenga el código respectivo y deberá quedar así:
Public Class frmAutos

Private SubfrmAutos_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'TODO: esta línea de código carga datos en la tabla 'DbControlVehiculoDataSet.autos' Puede moverla o quitarla según sea necesario.
Me.AutosTableAdapter.Fill(Me.DbControlVehiculoDataSet.autos)
End Sub

Private Sub frmAutos_FormClosing(ByVal sender As Object, ByVal e As...