V basic

Aplicación en Visual Basic con Base Datos
Guía para crear aplicación básica
Material de apoyo para el curso de base de datos/lenguajes de programación, servicios del Dpto. de Ing. Industrial de la UNT MARTIN INCA ALAYO Ing. Industrial, MBA

Aplicación en Visual Basic con Base de Datos

M.IncaAlayo

Contenido: 1. Base de datos de trabajo: neptuno.mdb con las tablas: 1.1. Clientes 1.2.Productos 1.3. Empleados 1.4. Compañías de envíos 1.5. Pedidos 1.6. Detalles de pedidos 1.7. Categorías 1.8. Proveedores

2. Consultas SQL de Neptuno, con explicación de una consulta ventas por catgeorías de productos.

3. Crear interfase de usuario 3.1. Crea proyecto en Visual Basic, tipo estándar. 3.2. Crear formulario principal, con menú de opciones, usando el Editor de menús. 3.3. Crearformulario para clientes, TextBox, Adodc. utilizando los controles visuales Label,

3.4. Crear formulario para consultas de ventas, usando los controles Datagrid, Combox y Label. 3.5. Enlace de formularios, para vincular el formulario principal con los otros formularios ya preparados. 4. Creación del instalador del aplicativo.

2

Aplicación en Visual Basic con Base de Datos

M.IncaAlayoCREAR APLICACIÓN EN VISUAL BASIC 6.0/ACESS 1. Base de datos de trabajo: neptuno.mdb: Diagrama de relaciones

El modelo de Neptuno corresponde a un sistema de comercio exterior, donde los clientes de diferentes países compran productos de otros países diferentes. Se registran los pedidos para cada cliente y por un solo empleado. En cada pedido se registran varios productos en cantidades diferentes.El transporte del pedido lo realiza la Compañía se envío. Cada producto esta agrupado en 8 categorías de productos y cada producto es vendido por un solo proveedor de un país diferente.

3

Aplicación en Visual Basic con Base de Datos

M.IncaAlayo

2. Consultas SQL de neptuno

Por ejemplo la consulta Ventas por categoría tiene la sgte. sentencia SQL:

Select NombreCategoria,sum(cantidad*D.precio unidad) as Ventas From (Categorías C inner join Productos P on C.IdCategoría=P.IdCategoría ) inner JOIN [Detalles de pedidos] D on P.IdProducto = D.Idproducto Group by NombreCategoría;

Esta sentencia junta las tablas Categorías, Productos y Detalles de pedidos en una sola tabla bajo las condiciones de que las categorías de cada producto y los productos pedidos. Las ventas será lasuma de cantidad por precio unidad en cada una de las categorías. Esta suma incluye solo los productos pedidos.

4

Aplicación en Visual Basic con Base de Datos
3. Crear interfase de usuario

M.IncaAlayo

3.1. Crea proyecto en VB: File - New : Standard EXE - OK. Cada proyecto se crea con un formulario Form1.

El proyecto, que tiene el nombre Project1, se puede cambiar de nombreseleccionando el proyecto en el explorador de proyectos y pasando a la ventana de propiedades en Name y escribiendo por ejemplo AplicNeptuno. Grabamos el proyecto en una carpeta nueva denominada AplicNeptuno. 3.2. Crear formulario principal con opciones de menú: En el Form1, botón derecho y Menu Editor:

5

Aplicación en Visual Basic con Base de Datos

M.IncaAlayo

Para adicionar otro elementose presiona el botón Next, se escribe Clientes en el recuadro Caption y se escribe mnu11 en el recuadro Name y luego se presiona el boton -> (flecha a la derecha) para indicar que es una subopción de la opción Tablas. Así se crean Opciones y subopciones.

3.3. Crear formulario para clientes

Uso de los controles Label, TextBox y Data Control ADO. Este control hay que activarlo desde la opciónProyecto – Componentes, seleccionando Microsoft ADO Data Control (SP4). Para prepararlo hay que completar la propiedad ConnectionString y RecordSource. Luego para cada Textbox hay que asociarlo al data control mediante la propiedad Datasource y DataField. En propiedades del control Adodc, ubicamos ConnectionString y luego … donde aparece un asistente que seleccionar el proveedor de datos...