Make your own free website on Tripod.com
Volver a Access parte 2 Ir al Indice Utilizando ControlData
USO DE BASES DE DATOS EN VISUAL BASIC
Para utilizar Bases de Datos en Visual Basic existe un Control llamado Control Data
Lo asociamos a una base de da-
tos mediante la Propiedad DataBaseName y elegimos de la lista desplegable en la Propiedad RecordSourse el nombre de la Tabla con la que deseamos trabajar. También se pueden utilizar instrucciones SQL.
La propiedad Connect se utiliza para indicar qué sistema de Base de Datos utilizaremos(DBase, Access, Paradox, Text, Excel etc.)
El objeto Data posée dos botones que nos permiten desplazar el cursor a través de los registros..
ir al anterior
d.recordset.moveprevious
d.recordset.movelast
ir al último
| |
ir al primero
d.recordset.movefirst
d.recordset.movenext
ir al siguiente

Varios controles se pueden enlazar al Control Data, uno de ellos es el objeto TextBox o Cuadro de Texto. Para esto indicamos en la propiedad DataSource el nombre del ControlData y DataField el nombre del campo.
A continuación crearemos una pequeña base de datos en Access a fin de poder utilizarla luego desde Visual Basic.
Abrimos Access y utilizamos Base de datos en blanco:

  1. Cuando nos pregunta qué nombre vamos a usar es importante colocar Tp1.mdb y recordar el lugar donde la colocamos (ejemplo dentro de mis documentos, aunque podría ser en cualquier lugar al que luego recordemos cómo acceder)
  2. Vamos al ícono Nuevo y hacemos aceptar en "Vista Diseño", o bien hacemos click en "Crear una tabla en Vista Diseño"
  3. En la tabla que aparece colocamos los siguiente datos:
Luego vamos a la vista Hoja de datos y colocamos:
CodigoCliente
Apellido
Tipo
Saldo
10
Perez
A
$20,00
20
Gomez
A
$30,00
30
Ruiz
B
$50,00
40
Sanchez
B
$10,00
Nombre de Campo
CodigoCliente
Apellido
Tipo
Saldo
Tipo de Datos
Numérico
Texto
Texto
Moneda
4. Al Finalizar guardamos la tabla con el nombre Clientes.

Luego debemos crear otra tabla con los siguientes datos:

En la Vista Hoja de Datos colocamos
Legajo
Apellido
Sexo
Cargo
Sueldo
10
Juarez
m
Emp
$800,00
20
Suarez
f
Jef
$1.200,00
30
Diaz
m
Emp
$600,00
40
Lopez
f
Jef
$1.600,00
50
Ruiz
m
Emp
$1.200,00
60
Willie
f
Supervisor
$3.000,00
70
Maurín
m
Gerente
$5.000,00
Nombre de Campo
Legajo
Apellido
Sexo
Cargo
Sueldo
Tipo de Datos
Numérico
Texto
Texto
Moned
a
Esta nueva tabla la guardaremos con el nombre de Empleados
Si está trabajando con Access 2000 y no ha colocado el Service Pack Vs6SP5VB deberá ir a Herramientas/Utilidades de la Base de Datos/Convertir base de datos/a una versión anterior de la base de datos de Access a fin de que V.Basic pueda trabajar con ella
PROPIEDADES
Nombre
RecordSource
DataBaseName
Caption
Connect = bases de datos varias
EOF= Fin de Registro
BOF= Comienzo de Registro
Recordset.Recordcount
El Objeto Data posée 2 propiedades para indicar el principio y el final de los registro. La primera es BOF (Begin of File - Comienzo de archivo). Tendrá como valor TRUE (Verdadero) si nos encontramos al principio del archivo. La otra propiedad EOF(End of File - Final del archivo) valdrá TRUE (Verdadero) cuando se llega más allá del último registro.
Estas propiedades se utilizan para recorrer los datos de una tabla.

A continuación aplicaremos los conocimientos adquiridos en un formulario. En un formulario se debe colocar un ControlData, asociado mediante la ventana de propiedades a la base de datos recién creada. Teniendo seleccionado el ControlData en la ventana de propiedades colocaremos:

  1. Nombre: D
  2. En DataBaseName, se deberá hacer click en la columna derecha con lo que aparecerá un desplegable, allí seleccionamos el lugar donde colocamos la base de datos recién diseñada. Por ejemplo si la misma estuviera en un disquette su ubicación posible podría ser: A:\tp1
  3. Caption: Borramos "Data1" y lo dejamos vacio.
  4. En connect: Colocamos la base de datos que hayamos utilizado. En nuestro caso Access 2000, aunque también podría haber sido Access`97 u otra base de datos.
  5. En RecordSource colocaremos Clientes para que utilice esta tabla de nuestra base de datos tp1

También colocaremos un Cuadro de Textos con el nombre de txt1:

  1. En DataField colocaremos Apellido
  2. En DataSource colocaremos D
  3. En text eliminaremos cualquier texto que aparezca en la columna derecha

Veremos cómo en ejecución mediante el botón que se encuentra más a la izquierda podremos ir al primer registro (BOF) y con el que se encuentra más a la derecha al último registro (EOF), mientras que con el 2do.botón comenzando desde la izquierda podremos retroceder registros de a uno y con el tercer botón adelantaremos registros de a uno. Los resultados se harán visibles en el cuadro de texto txt1. En este caso no ha sido necesario escribir código ya que todo se encontraba indicado en la ventana de propiedades.

En la próxima veremos cómo usar este control con algo de código.

Volver arriba Volver a Access parte 2 Ir al Indice Utilizando ControlData