Parte 5: Controles Estándar
Adicionales
y Procedimientos
Control Marco (Frame) 
Este control permite
agrupar otros controles para darle mayor funcionalidad a la
interfaz. Los controles Botones de Opción
necesariamente tienen que estar agrupados por el control
Marco. Para agrupar controles, dibuje primero el control
Marco y, a continuación, dibuje los controles dentro de
Marco.
Propiedades
Caption Título de marco.
Enabled Determina si está habilitado para
responder a las acciones del
usuario.
Name Nombre del control.
Visible Determina si el Marco y los controles
que contiene están visibles o no.
Control Casilla de Verificación (CheckBox)
Las casillas de verificación se utilizan para
proporcionar al usuario opciones de tipo Si/No o Verdadero/Falso.
Cuando el usuario selecciona una opción (activa la
casilla), aparece una marca de
verificación (a ) dentro de la
casilla.
Propiedades
Caption Descripción que acompaña a la
casilla.
Enabled True/False. Determina si está habilitado
para responder a las acciones del usuario.
Name Nombre del control.
Value 0 – Unchecked (Vacío, no
marcado)
1 – Checked (Marcado)
2 – Grayed (Gris, Indefinido)
Visible Determina si la casilla está visible o
no.
Eventos
Click Ocurre cuando el usuario hace clic sobre la
casilla.
Control Botón de Opción
(OptionButton) 
Estos controles se utilizan para que el usuario
seleccione una opción de un grupo
opciones. La opción seleccionada tiene un punto en el
centro.
Propiedades
Caption Descripción que acompaña a la
opción.
Enabled True/False. Determina si está habilitado
para responder a las acciones del usuario.
Name Nombre del control.
Value True/False, marcado o no marcado.
Visible True/False. Determina si el botón
está visible o no.
Eventos
Click Ocurre cuando el usuario hace clic sobre el
botón.
Arreglo de Controles
Cuando creamos un arreglo de controles, todos los
controles que forman el arreglo deben tener el mismo nombre
(Propiedad
Name), la propiedad Index establece el índice de
cada control en el arreglo, esta propiedad comienza desde
0.
Un arreglo de controles es un grupo de controles que
comparten el mismo:
- Tipo de objeto
- Nombre del control
- Procedimientos de evento
Código más fácil de escribir y
mantener
Los arreglos de controles hace que el código
sea más fácil de escribir y mantener debido a que
solo escribe un solo procedimiento de
evento para todos los controles pertenecientes al arreglo, el
parámetro Index del procedimiento de evento
determina desde que control ocurrió el evento.
Código más eficiente
Los arreglos de controles hacen que el código sea
más eficiente y mejoran el rendimiento de la
aplicación debido a que usa menos recursos del
sistema que los
controles individuales.
¿Cómo se crea un arreglo de
controles?
Luego de crear y establecer el nombre del primer
control, tiene dos alternativas:
Método
1
- Copiar el primer control al portapapeles.
- Luego pegar el control de portapapeles en el
formulario. Visual Basic le
preguntará si desea crear un arreglo de
controles. - Repita el paso 2 hasta completar el
arreglo.
Método 2
- Dibuje el siguiente control y establezca su nombre
igual al del primer control. Visual Basic le
preguntará si desea crear un arreglo de
controles. - Repita el paso 1 hasta completar el
arreglo.
Ejemplo
La interfaz mostrada tiene un arreglo de controles para
seleccionar el reporte, el procedimiento de evento es el mismo
para cualquier elemento del arreglo.
El código para el evento clic es:
Control Barra de Desplazamiento 
Barra de Desplazamiento Horizontal
(HScrollBar)
Barra de Desplazamiento Vertical (VScrollBar)
Son usuados con frecuencia para permitir rápidos
desplazamientos a través de una lista grande de items. Por
ejemplo: archivos,
indicadores de
posición actual de una escala de
valores,
indicadores de volumen en un
sistema de audio.
Propiedades
LargeChange De 1 a 32767. Cantidad de cambio
cuando el usuario hace clic en el desplazamiento
largo.
Max Máximo valor de
desplazamiento cuando el botón se encuentra en la
posición más alta. Valor predeterminado:
32767.
Min Mínimo valor del desplazamiento cuando el
botón se encuentra en la posición más
baja. Valor predeterminado: 0.
Name Nombre ddel control.
SmallChange De 1 a 32767. Cantidad de cambio cuando el
usuario hace clic en la flecha de desplazamiento.
Value Valor actual en la escala de valores.
Evento
Change Ocurre cuando el usuario se desplaza o se
cambia el valor de la propiedad Value.
Control Cuadro de Lista (ListBox) 
Un control ListBox muestra una lista
de elementos entre los cuales el usuario puede seleccionar uno o
más elementos. Si el número de elementos supera el
número que puede mostrarse, se agregará
automáticamente una barra de desplazamiento al control
ListBox.
La propiedad List es un arreglo que
contiene los elementos de la lista, y comienza con índice
0. La propiedad ListCount establece el
número total de elementos de la lista. La propiedad
ListIndex contiene el índice del elemento
seleccionado, el cual es un número entre 0 (primer
elemento) y el número total de elementos en la lista
–1 (ListCount – 1). Si no se selecciona
ningún elemento, el valor de la propiedad
ListIndex será –1.
La propiedad NewIndex contiene el
índice del último elemento añadido a la
lista. Esto puede ser útil si desea hacer algo con el
elemento añadido, por ejemplo, que sea el elemento
actualmente seleccionado.
Propiedades
Enabled True/False. Determina si el control responde a
las acciones del usuario.
List Arreglo con los elementos de la lista.
ListCount Número de elementos de la
lista.
ListIndex Elemento seleccionado.
MultiSelect Establece si es posible seleccionar varios
elementos o uno solo.
Name Nombre del control.
NewIndex Indice del último elemento
añadido al Cuadro de Lista.
Selected Arreglo de valores lógicos paralelo y
del mismo tamaño al arreglo list, indica que
elementos han sido seleccionados (True) de la lista. Se utiliza
en lugar de ListIndex cuando establecemos la propiedad
Multiselect en 1 ó 2.
Sorted True/False. Establece los elementos se ordenan
alfabéticamente.
Style Establece el comportamiento del control.
Text Devuelve el elemento seleccionado en el cuadro de
lista; el valor de retorno es siempre equivalente al que
devuelve la expresión List(ListIndex). Es de sólo
lectura en
tiempo de
diseño y es de sólo lectura en
tiempo de ejecución.
Métodos
AddItem Permite añadir nuevos elementos a la
lista.
RemoveItem Permite eliminar elementos de la
lista.
Eventos
Click Ocurre cuando el usuario interactúa con
el control.
Ejemplos
Muestra en el Cuadro de Texto
txtGaseosa el elemento seleccionado
Private Sub lstGaseosas_Click()
txtGaseosa.Text = lstGaseosas.Text
End Sub
Añade un nuevo elemento al Cuadro de Lista
lstGaseosas
Elimina el elemento actual del Cuadro de Lista
lstGaseosas
Control Cuadro Combinado (ComboBox) 
Un control ComboBox combina las
características de un control TextBox y un control
ListBox; los usuarios pueden introducir información en la parte del cuadro de texto
o seleccionar un elemento en la parte de cuadro de lista del
control.
Para agregar o eliminar elementos en un control
ComboBox, se usa el método AddItem o
RemoveItem. Establezca las propiedades List,
ListCount y ListIndex para permitir a un usuario tener
acceso a los elementos de un control ComboBox. Como
alternativa, puede agregar elementos a la lista mediante la
propiedad List en tiempo de diseño.
Propiedades
Enabled True/False. Determina si el control responde a
las acciones del usuario.
List Arreglo con los elementos de la lista.
ListCount Número de elementos de la
lista
ListIndex Elemento seleccionado.
Name Nombre del control.
NewIndex Indice del último elemento
añadido al cuadro de lista.
Sorted True/False. Establece si los elementos se
ordenan alfabéticamente.
Style Establece el comportamiento del
control.
Text Texto que contiene el control.
Métodos
AddItem Permite añadir nuevos elementos a la
lista.
RemoveItem Permite eliminar elementos de la
lista.
Eventos
Click Ocurre cuando el usuario interactúa con la
lista del control.
Change Ocurre cuando el valor de la propiedad
Text es modificado.
Propiedad Style
Esta propiedad establece el comportamiento del control
ComboBox, y puede tomar los siguientes valores:
Ejemplo
En la siguiente interfaz se ilustra el uso del control
ComboBox y la propiedad Style.
Muestra la gaseosa seleccionada por el usuario en la
etiqueta lblGaseosa
Private Sub cboGaseosas_Click()
lblGaseosa.Caption = cboGaseosas.Text
End Sub
Actualiza la etiqueta lblGaseosa cuando el usuario
modifica el control cboGaseosas
Private Sub cboGaseosas_Change()
lblGaseosa.Caption = cboGaseosas.Text
End Sub
Muestra el encuestado seleccionado por el usuario en
la etiqueta lblEncuestado
Private Sub cboEncuestados_Click()
lblEncuestado.Caption = cboEncuestados.Text
End Sub
Muestra en la etiqueta lblCiudad el elemento
seleccionado del control cboCiudades
Private Sub cboCiudades_Click()
lblCiudad.Caption = cboCiudades.Text
End Sub
Procedimientos
Existen dos tipos de procedimientos
con los que se trabaja en Visual Basic: los procedimientos de
evento y los procedimientos generales.
Procedimientos de Evento
Visual Basic invoca automáticamente
procedimientos de evento en respuesta a acciones del teclado, del
ratón o del sistema. Por ejemplo, los botones de comando
tienen un procedimiento de evento Click. El código que se
escriba en el procedimiento de evento Click es ejecutado cuando
el usuario haga clic en un botón de comando.
Cada control tiene un conjunto fijo de procedimientos de
evento. Los procedimientos de evento para cada control son
mostrados en un cuadro de lista despegable en la ventana de
código.
Procedimientos Generales
Los procedimientos generales son procedimientos
Sub o Function que son creados para que lleven a
cabo tareas específicas, estos deben ser invocados de
manera explícita.
Para crear un procedimiento general, se debe abrir la
ventana de código y hacer clic en la orden Agregar
procedimiento del menú Herramientas.
También se puede crear un nuevo procedimiento escribiendo
el encabezado de procedimiento Sub, seguido por el nombre
del procedimiento, en una línea en blanco dentro de la
ventana de código.
Si se tiene código duplicado en varios
procedimientos de evento, se puede colocar el código en un
procedimiento general y luego invocar al procedimiento general
desde los procedimiento de evento.
Procedimientos Sub
Los procedimientos Sub no retornan valores. Por
ejemplo:
Los procedimientos Sub son invocados
especificando sólo el nombre del procedimiento, o
empleando la instrucción Call con el nombre del
procedimiento. Por ejemplo:
Call Seleccionar(Text1)
Si se emplea la instrucción Call, se debe
encerrar la lista de argumentos entre paréntesis. Si se
omite Call, también se deben omitir los
paréntesis alrededor de la lista de argumentos.
Procedimientos Function
Los procedimientos Function devuelven valores. En
el siguiente ejemplo, el procedimiento Function recibe un
número y devuelve ese número al
cuadrado.
Public Function Cuadrado(N As Integer) As
Integer
Cuadrado = N * N
End Function
Si se desea guardar el valor devuelto, se debe usar
paréntesis cuando se invoque a la función,
como se muestra a continuación:
Resultado = Cuadrado (5)
Si se omiten los paréntesis, se puede ignorar el
valor devuelto y no guardarlo en una variable. Esto puede ser
útil si se quiere ejecutar una función y no se
desea el valor devuelto. Por ejemplo:
Cuadrado 5
Alcance del Código
Además de poder declarar
código en un módulo de formulario, también
se puede declarar procedimientos en un módulo de
código estándar.
Los módulos de código estándar
sólo contienen código de Visual Basic, y son un
buen lugar para almacenar código que no es
específico para un solo formulario. Los procedimientos
pueden ser declarados como Private (privados) o
Public (públicos).
Los procedimientos declarados como Private pueden
ser llamados o invocados sólo por otros procedimientos
localizados en ese formulario, módulo o clase.
Los procedimientos declarados como Public en un
formulario se convierten en métodos
del formulario. El procedimiento puede ser llamado desde
cualquier lugar de la aplicación especificando los nombres
del formulario y del procedimiento.
Los procedimientos declarados como Public en un
módulo están disponibles para toda la
aplicación, y pueden ser llamados especificando el nombre
del procedimiento.
El siguiente código declara un procedimiento
Public.
Public Sub MiProc()
End Sub
Si se declara el procedimiento en un módulo de
formulario, puede ser llamado con el siguiente
código.
Form1.MiProc
Si se declara el procedimiento en un módulo
estándar, puede ser llamado con el siguiente
código.
MiProc
Si se declara un procedimiento con el mismo nombre en
dos módulos estándar, se debe especificar el nombre
del módulo como se muestra en el siguiente
código.
Module1.MiProc
Uso del Examinador de Objetos para ver Procedimientos
y Librerías de Objetos
Una vez que se ha añadido código a una
aplicación se puede emplear el Examinador de
objetos para listar a todos los procedimientos que han sido
creados, pasar rápidamente a un procedimiento
específico, o pegar una llamada a un procedimiento dentro
de una ventana de código.
El Examinador de objetos visualiza las clases que
están disponibles desde cualquier librería de
objetos a la que se ha establecido una referencia. Para
visualizar el Examinador de objetos presione la tecla de
función F2.
Parte 6: Depuración, Validación de
Datos
y Manipulación de
Errores
Cuando desarrolle aplicaciones en Visual Basic, es
importante depurar el código escrito y manipular los
probables errores que puedan ocurrir. También es
importante prevenir en lo posible estos errores validando los
ingresos de
datos a la
aplicación.
Herramientas de Depuración
Visual Basic proporciona herramientas
interactivas para localizar errores en tiempo de ejecución
y errores en la lógica
del programa. Se
puede acceder a todas las herramientas de depuración
empleando el menú Depuración o la barra de
herramientas Depuración. Las herramientas de
depuración en Visual Basic incluyen:
Puntos de interrupción y expresiones de
interrupción
Establece un punto de interrupción para detener
un programa en ejecución. Se puede establecer un punto de
interrupción en tiempo de diseño o en tiempo de
ejecución mientras se esté en modo de
interrupción.
Expresiones de inspección
Emplee las expresiones de inspección para
examinar una variable o expresión en particular. El valor
de cada expresión de inspección es actualizado en
los puntos de interrupción
Opciones paso a paso
Use las opciones paso a paso para ejecutar porciones de
código ya sea una instrucción o procedimiento a la
vez.
Pila de llamadas
Emplee Pila de llamadas para visualizar todas las
llamadas a procedimientos activas y rastrear la ejecución
de una serie de procedimientos anidados.
La ventana inmediato
En modo de interrupción, se puede probar una
sentencia ejecutable escribiéndola en la ventana
inmediato. Visual Basic ejecuta la sentencia inmediatamente de
modo que se pueda evaluar el código.
La ventana locales
Esta ventana automáticamente visualiza todas las
variables
declaradas en el procedimiento actual, junto con sus
valores.
Validación de
Datos
Se puede prevenir algunos errores en el ingreso de datos
y mejorar el uso de una aplicación validando
información mientras es ingresada a los campos de la
aplicación.
Restricción de Opciones con
Controles
Una manera de asegurar ingresos válidos es
restringiendo el número de opciones que un usuario puede
escoger. Por ejemplo, se puede emplear un cuadro de lista para
permitir a los usuarios seleccionar un nombre de un producto en un
formulario. Debido a que los usuarios deben escoger un producto
de una lista predefinida, no podrán ingresar un nombre de
producto no válido.
También se pueden usar botones de opción
para un número pequeño de opciones, o casillas de
verificación para opciones de tipo booleanas.
Uso de la propiedad MaxLength
La propiedad MaxLength determina la longitud
máxima de una cadena en un cuadro de texto. El sistema
emitirá un sonido (beep)
cuando el usuario trate de escribir una cadena que exceda la
longitud máxima. Si se desea visualizar un mensaje de
error, se necesita interceptar la tecla oprimida en el evento
KeyPress.
Uso de la propiedad Locked
La propiedad Locked determina si los usuarios
pueden modificar los datos en un cuadro de texto. Si la propiedad
Locked es establecida a True, los usuarios
sólo pueden ver y copiar los datos de un cuadro de
texto.
Uso del Evento KeyPress para Validar
Datos
Se pueden emplear los eventos KeyPress,
KeyDown y KeyUp para validar datos mientras el usuario escribe.
Se puede prevenir que el usuario ingrese ciertos caracteres (por
ejemplo, puede limitar el ingreso de datos a valores
numéricos). Se puede también modificar los datos
mientras son ingresados (por ejemplo, puede convertir todos los
caracteres a mayúsculas).
El evento KeyPress tiene lugar cuando el usuario ingresa
un carácter ASCII
estándar. Esto no incluye la mayoría de la teclas
especiales, tales como las teclas de función, las teclas
direccionales, o la tecla DELETE. Para responder a estas teclas
se debe emplear los eventos KeyDown y KeyUp. El siguiente
código cambia los caracteres a mayúsculas mientras
el usuario escribe.
Private Sub Text1_KeyPress(KeyAscii as
Integer)
KeyAscii = Asc(Ucase(Chr(KeyAscii)))
End Sub
El siguiente código previene que los usuarios
ingresen sólo valores numéricos en un cuadro de
texto.
Para visualizar una lista de los valores
ASCII, busque ASCII en la ayuda de Visual
Basic.
Validación de Información a Nivel de
Formulario
Además de emplear técnicas a
nivel de campo para validar los datos mientras son ingresados, se
puede escribir código que valide los datos en todos los
campos de un formulario al mismo tiempo. En esta parte del curso
se verán las técnicas de validación a nivel
de formulario soportadas por Visual Basic.
Habilitando el Botón Aceptar
Una forma de validar la información del
formulario sería la de asegurar que un usuario ha
ingresado los datos en todos los campos en un formulario antes de
que se le permita continuar. Esto puede llevarse a cabo
deshabilitando el botón Aceptar en un formulario hasta que
el usuario haya llenado todos los campos, como se muestra a
continuación.
Para comprobar cada tecla oprimida en un formulario, se
debe establecer la propiedad KeyPreview de un formulario a
True. El formulario recibe primero el evento del teclado y
luego lo recibe el control.
El siguiente código habilita el botón
Aceptar luego de ingresar datos en todos los campos.
Validación de Todos los Campos de un
Formulario
Una manera sencilla de validar todos los campos de un
formulario al mismo tiempo es poniendo el código de
validación en el evento Click del botón
Aceptar. En esta caso, la aplicación le permite al
usuario completar el ingreso de datos en todos los campos del
formulario y luego validarlos. La aplicación establece el
enfoque en el primer campo que contiene los datos
incorrectos.
El siguiente código valida todos los campos
numéricos del formulario mostrado
anteriormente.
Uso del Evento QueryUnload
El evento QueryUnload tiene lugar justo antes del evento
Unload cuando el formulario es descargado. El evento QueryUnload
permite determinar como fue iniciado el evento Unload y cancelar
este evento. Es útil cuando un usuario no ha completado el
ingreso de datos a un formulario, o cuando se quisiera preguntar
al usuario si desea grabar cambios realizados antes cerrar el
formulario.
El evento QueryUnload tiene los siguientes
argumentos:
- El argumento Cancel cancela el evento Unload.
Si Cancel se establece a True la
aplicación permanece como estaba antes de que se
intentara la descarga. - El argumento UnloadMode indica como fue
iniciado el evento Unload.
Valores que se pueden obtener
El argumento UnloadMode (modo_descarga)
devuelve los siguientes valores:
El siguiente código cancela el evento Unload y
pregunta al usuario antes de cerrar el formulario.
Notas:
- Cuando se cierra un objeto MDIForm, el
evento QueryUnload ocurre primero para el formulario MDI
principal y después en todos los formularios
secundarios MDI. Si ningún formulario cancela el evento
QueryUnload, ocurre el evento Unload primero en todos los
demás formularios y después en un formulario MDI
principal. Cuando un formulario secundario o un objeto
Form se cierra, el evento QueryUnload de ese formulario
ocurre antes que el evento Unload del
formulario. - Cuando una aplicación se cierra, puede
utilizar los procedimientos de evento QueryUnload o Unload para
establecer la propiedad Cancel a True, deteniendo
el proceso de
cierre. Sin embargo, el evento QueryUnload ocurre en todos los
formularios antes de que se descargue ninguno de ellos y el
evento Unload ocurre conforme se descarga cada
formulario.
Manipulación de Errores en Tiempo de
Ejecución
No importa lo bien que se diseñe una
aplicación, los errores en tiempo de ejecución
siempre ocurrirán. Los usuarios olvidan poner los discos
en las unidades, sistemas se
ejecutan con poca memoria, y
archivos no se encuentran donde se supone deberían estar.
Añadiendo código de manipulación de errores
efectivo a una aplicación, se crean aplicaciones
más robustas.
Entendiendo el Proceso de Manipulación de
Errores
El proceso de manipulación de errores involucra
los siguientes pasos.
- Habilitar la interceptación de errores que
especifica hacia donde se bifurcará la ejecución
cuando ocurra un error. - Escribir el código de manipulación de
errores. - Salir del código de manipulación de
errores.
La instrucción On Error GoTo habilita la
interceptación de errores y especifica hacia donde
saltará la ejecución cuando ocurra un error. Si
ocurriera un error en tiempo de ejecución, la
ejecución saltará hacia la etiqueta especificada
por la instrucción On Error GoTo. El manipulador de
errores ejecuta el código de manipulación de
errores seguido por una instrucción Resume que
indica donde deberá continuar el proceso.
El siguiente código muestra como emplear las
instrucciones On Error GoTo y Resume.
En el código o rutina de manipulación de
errores, se emplean las propiedades y métodos del objeto
Err para verificar que error ocurrió, borrar un
valor de error o desencadenar un error.
Las Propiedades del Objeto Err
La propiedad Number es un entero que indica el
último error que tuvo lugar. Para determinar que error ha
ocurrido, se verifica el valor de Err.Number. En algunos
casos, se puede corregir un error y permitir continuar el proceso
sin interrumpir el usuario. En otros, se deberá notificar
al usuario de un error, y tomar alguna acción
basada en la respuesta del usuario.
La propiedad Description es una cadena que
contiene una descripción del error.
La propiedad Source contiene el nombre del objeto
aplicación que generó el error. Es útil
cuando se emplea Automatización. Por ejemplo, si se trabaja
con Microsoft
Excel y genera un error, Microsoft
Excel
establecerá Err.Number al código de error
apropiado y establecerá Err.Source a
Excel.Application.
Los Métodos del Objeto Err
El método Clear establece el valor de
Err.Number a cero. Básicamente, el método
Clear se emplea borrar explícitamente el objeto
Err después de controlar un error.
El método Raise genera un error en tiempo
de ejecución. Por ejemplo, se podría emplear este
método para probar el código de manipulación
de errores.
Err.Raise 53 'Archivo no
encontrado
Opciones de las Instrucción
Resume
La instrucción Resume se emplea para
especificar donde continuará el proceso de una
aplicación luego de manipular un error. La siguiente tabla
lista los tres tipos de instrucciones Resume disponibles
en Visual Basic.
Instrucción Descripción
Resume Regresa a la instrucción que
generó el error. Emplee Resume para repetir una
operación luego de corregir el error.
Instrucción Descripción
Resume Next Regresa a la instrucción
inmediatamente siguiente a la que generó el
error.
Resume línea La
ejecución continúa en la línea
especificada en el argumento obligatorio
línea.
Nota:
- Si utiliza una instrucción Resume en
otro sitio que no sea una rutina de manipulación de
errores, ocurre un error.
Deshabilitando la Manipulación de
Errores
Puede ser difícil depurar código que tiene
habilitada la manipulación de errores. Visual Basic puede
ejecutar el código de manipulación de errores
cuando se quiera ingresar al modo de Interrupción y
depurar la aplicación.
Visual Basic proporciona opciones para deshabilitar la
manipulación de errores en el momento de la
depuración.
- Para cambiar como serán manipulados los
errores:
- En el menú Herramientas, haga clic en
Opciones. - En la ficha General, debajo de
Interceptación de errores, haga clic en la
opción deseada y luego en Aceptar.
La siguiente tabla describe las opciones de
manipulación de errores disponibles debajo de
Interceptación de errores en la ficha
General.
Compilación de una
Aplicación
Una vez finalizada la creación de una
aplicación, se puede crear el archivo ejecutable para los
usuarios. Esta parte del curso describe como compilar un proyecto.
Creación de un Archivo
Ejecutable
Crear un archivo ejecutable en Visual Basic es un
proceso sencillo.
- En el menú Archivo, haga clic en
Generar <NombreProyecto>.exe - Ingrese el nombre para el archivo
ejecutable. - Para añadir información
específica de versión:
En el cuadro de diálogo Generar proyecto, haga
clic en el botón Opciones. En la ficha
Generar escriba los números de versión y
el texto de información de la versión , y luego
haga clic en Aceptar.
Además del archivo ejecutable, se debe de
proporcionar diversas DLL's y otros archivos a los usuarios. Se
debería crear un programa de instalación que
instale la aplicación en la
computadora del usuario.
El Asistente para instalar aplicaciones de
Visual Basic hace sencilla la tarea de crear discos o una
carpeta de distribución para una aplicación.
Los usuarios pueden luego ejecutar el programa de
instalación en sus computadoras
para instalar y registrar los archivos apropiados.
Parte 7: Controles Estándar
Avanzados
y Acceso a Datos
Control Cuadro de Lista de Unidades (DriveListBox)
Un control DriveListBox permite al usuario seleccionar
una unidad de disco válida en tiempo de ejecución.
Utilice este control para mostrar una lista de todas las unidades
válidas del sistema de un usuario. Puede crear cuadros de
diálogo que permitan al usuario abrir un archivo de una
lista de un disco en cualquier unidad disponible.
Propiedades
Drive Devuelve o establece la unidad seleccionada en
tiempo de ejecución. No está disponible en tiempo
de diseño.
List Contiene la lista de conexiones de unidad
efectivas.
ListCount Devuelve el número de conexiones con
unidades de disco.
ListIndex Devuelve o establece el índice del
elemento seleccionado actualmente en el control. No está
disponible en tiempo de diseño.
Eventos
Change Ocurre cuando el usuario selecciona una nueva
unidad o cuando se cambia la configuración de la
propiedad Drive mediante código.
Control Cuadro de Lista de Directorios (DirListBox)
Un control DirListBox muestra directorios y rutas de
acceso en tiempo de ejecución. Utilice este control para
mostrar una lista jerárquica de directorios. Puede crear
cuadros de diálogo que, por ejemplo, permitan a un usuario
abrir un archivo desde una lista de archivos de todos los
directorios disponibles.
Propiedades
List Contiene una lista de todos los
directorios.
ListCount Devuelve el número de subdirectorios
del directorio actual.
ListIndex Indica el índice de la ruta de acceso
actual.
Path El valor de la propiedad Path es una cadena que
indica una ruta de acceso, como C:Ob o C:WindowsSystem.
Eventos
Change Ocurre cuando el usuario hace doble clic en un
nuevo directorio o cuando se cambia la configuración de
la propiedad Path mediante código.
Control Cuadro de Lista de Archivos (FileListBox)
El control FileListBox encuentra y muestra los archivos
del directorio especificado por la propiedad Path en tiempo de
ejecución. Utilice este control para mostrar una lista de
los archivos seleccionados por tipo. Puede crear cuadros de
diálogo en la aplicación que, por ejemplo, permitan
al usuario seleccionar un archivo o un grupo de
archivos.
Propiedades
FileName Devuelve o establece el nombre de un archivo
seleccionado.
List Contiene una lista con los archivos del
directorio expandido actualmente que coinciden con la propiedad
Pattern. No se incluye la ruta de acceso.
ListCount Devuelve el número de archivos del
directorio actual que coinciden con el valor de la propiedad
Pattern.
ListIndex Devuelve o establece el índice del
elemento seleccionado actualmente.
Path El valor de la propiedad Path es una cadena que
indica una ruta de acceso, como C:Ob o
C:WindowsSystem.
Pattern Devuelve o establece un valor que indica los
nombres de archivo mostrados en un control FileListBox en
tiempo de ejecución.
Eventos
Click Ocurre cuando el usuario presiona y suelta un
botón del ratón en un control
FileListBox.
Control Imagen (Image)
El control Image se utiliza para mostrar un
gráfico. Un control Image puede mostrar un gráfico
desde un mapa de bits, un icono o un metarchivo, así como
un metarchivo mejorado, un archivo JPEG o archivos
GIF.
Propiedades
Picture Devuelve o establece un gráfico que se
mostrará en el control. También se le puede
asignar un gráfico devuelto por la función
LoadPicture.
Stretch True/False. Devuelve o establece un valor que
indica si un gráfico cambia su tamaño para
ajustarse al de un control Image.
Comentarios
El control Image utiliza menos recursos del
sistema y actualiza con más rapidez que un control
PictureBox, pero sólo admite un subconjunto de las
propiedades, los eventos y los métodos de
PictureBox. Use la propiedad Stretch para determinar si el
gráfico se escala para ajustarse al control o viceversa.
Aunque puede colocar un control Image dentro de un
contenedor, un control Image no puede actuar como
contenedor.
Función LoadPicture()
Carga un gráfico en un objeto Picture, un control
PictureBox o un control Image.
Formato:
LoadPicture(NombreDeArchivoGráfico)
También se puede usar la función
LoadPicture() para asignar un icono a un formulario o al
puntero del ratón mostrado en pantalla.
Ejemplos de la función
LoadPicture():
'Establece el icono del formulario
Set Form1.Icon = LoadPicture("MIICONO.ICO")
'Establece el puntero del ratón
Screen.MouseIcon =
LoadPicture("MIICONO.ICO")
Screen.MousePointer = 99
Creación de un visor de
imágenes
El código para los controles es el
siguiente:
Control Temporizador (Timer) 
Un control Timer puede ejecutar código a
intervalos periódicos produciendo un evento Timer. El
control Timer, invisible para el usuario, resulta
útil para el procesamiento de fondo. No existe
ningún límite práctico en cuanto al
número de controles Timer activos que se
puede tener en Visual Basic 5.0 ejecutándose en Windows 95
o en Windows
NT.
Propiedades
Enabled True/False. Activa o desactiva el control. Si
se desactiva el control Timer, estableciendo Enabled a
False, se cancelará la cuenta atrás establecida
por la propiedad Interval del control.
Interval Devuelve o establece el número de
milisegundos entre las llamadas al evento Timer de un control
Timer. Los valores admitidos para milisegundos son 0,
que desactiva el control Timer, o de 1 a 65535. El
máximo, 65535 milisegundos, equivale a poco más
de un minuto.
Eventos
Timer Ocurre cuando ha transcurrido un intervalo
preestablecido para el control Timer.
Ejemplo de uso del control Timer
Minimiza el formulario y activa el control
temporizador Timer1
Private Sub cmdEstablecer_Click()
Form1.WindowState = 1
Timer1.Enabled = True
End Sub
Termina la ejecución de la
aplicación
Private Sub cmdSalir_Click()
End
End Sub
Compara la hora actual con la hora ingresada en el
cuadro txtHora cada segundo y muestra el mensaje establecido en
caso de que sean iguales, desactiva el control temporizador y
restaura la ventana a su tamaño normal.
Uso del control Data 
En Visual Basic puede utilizar el control Data
para crear aplicaciones de bases de datos
para una gran variedad de formatos de base de datos.
El control Data interactúa con el motor de base de
datos Microsoft Jet y permite crear aplicaciones preparadas para
datos con la mínima cantidad de código
posible.
Vista General del Acceso a Datos
Antes de trabajar con la funcionalidad de base de datos
desde Visual Basic, se debe entender las capacidades de acceso a
datos, así como, la terminología
empleada.
Opciones de Acceso a Datos en Visual
Basic
Esta parte del curso enumera las diversas opciones que
Visual Basic proporciona para acceder a datos.
Uso del Motor de Base de Datos Microsoft
Jet
Los objetos de acceso a datos – Data Access Objects
(DAO) y el control Data usan el motor de base de
datos Microsoft Jet para acceder a bases de datos. El motor de
base de datos Jet puede acceder a los siguientes 3 tipos de bases
de datos.
- Bases de datos Jet
Estas bases de datos son creadas y manipuladas
directamente por el motor Jet. Microsoft
Access y Visual Basic emplean el mismo motor de base de
datos Jet.
- Bases de datos de Método de Acceso
Secuencial Indexado (ISAM)
Los formatos de estas bases de datos incluyen Btrieve,
dBase, Microsoft Visual FoxPro,
y Paradox.
- Bases de datos compatibles con ODBC (Open DataBase
Connectivity – Conectividad Abierta de Base de
Datos)
Estas bases de datos incluyen las bases de datos
cliente/servidor que
conforman el estándar ODBC, tal como Microsoft SQL Server.
La mayoría de bases de datos que soportan ODBC pueden
ser accedidas empleando Visual Basic.
Otros métodos de Acceso a Datos
Los otros métodos de acceso a datos soportados
por Visual Basic incluyen:
- El control Origen de Datos Remoto (Remote Data
Source)
Este es un control que emplea ODBC para acceder a
bases de datos ODBC tales como Microsoft SQL Server y
Oracle. El
control Origen de Datos Remoto sólo está
disponible en la edición Empresarial de Visual
Basic.
- Librerías ODBC
Estas librerías permiten que se llame a la
interface de programación de aplicaciones (API) de
ODBC directamente y están disponibles como un producto
separado.
- Librerías SQL de Visual
Basic
Estas librerías proporcionan un enlace directo
a Microsoft SQL Server, y están disponibles como un
producto separado.
Entendiendo los Conceptos Básicos acerca de las
Bases de Datos
La mayoría de sistemas de bases de datos emplean
el modelo de base
de datos relacional. Este modelo presenta los datos como una
colección de tablas. Una tabla es un grupo lógico
de información relacionada. Por ejemplo, la base de datos
Neptuno contiene una tabla que almacena a los empleados, y otra
almacena los pedidos de una compañía
ficticia.
La base de datos Neptuno.mdb es una base de datos de
ejemplo incluida con Microsoft Access.
Elementos de una Tabla
La base de datos Neptuno contiene un número de
tablas que agrupan la información. Estas tablas incluyen
Pedidos, Clientes, y
Empleados.
En una base de datos Jet, las filas de la tabla son
denominadas registros, y las
columnas campos.
La Clave Principal
Cada tabla debe de tener una clave principal, que es un
campo (o una combinación de campos) que es único
para cada registro en la
tabla. Por ejemplo, el campo IdEmpleado es la clave principal
para la tabla Empleados.
Una tabla puede también tener claves
foráneas, que son campos que hacen referencia a una clave
principal de otra tabla. Por ejemplo, en la base de datos
Neptuno, la tabla Pedidos tiene un campo llamado IdCliente. Este
campo es una clave foránea porque hace referencia a un
cliente de la tabla Clientes. En vez de duplicar toda la
información del cliente por cada pedido, sólo se
ingresa la clave principal del cliente a quien pertenece el
pedido, como la clave principal es única por cada cliente,
hay un solo cliente por cada pedido, y un cliente puede tener
muchos pedidos. En términos de una base de datos, la
relación entre la tabla Clientes y la tabla Pedidos es una
relación del tipo uno-a-varios.
Registros
Un registro contiene información acerca de un
solo ingreso en una tabla. Generalmente, no se desea que dos
registros en una tabla tengan los mismos datos. Por ejemplo, un
registro en la tabla Empleados contiene información acerca
de un único empleado.
Campos
Cada campo en una tabla contiene una parte de la
información. Por ejemplo, la tabla Empleados incluye
campos para el Id del empleado, Apellidos, Nombre,
etc.
Indices
Los índices de una tabla de una base de datos son
listas ordenadas que son más rápidas para las
búsquedas que las tablas en sí. Para habilitar un
acceso más rápido a una base de datos, la
mayoría de bases de datos emplean uno o más
índices. Por ejemplo, la tabla Empleados tiene un
índice para la columna IdEmpleado.
Trabajando con el Control Data
El control Data de Visual Basic permite escribir
aplicaciones de bases de datos muy eficaces con muy poco
código.
En esta parte se aprenderá a generar aplicaciones
de bases de datos con el control Data y el objeto
Recordset asociado. También se aprenderá
como el Asistente para Formularios de Datos puede construir una
aplicación que incluye el control Data.
Tener Acceso a Datos con el Control
Data
El control Data implementa el acceso a datos
mediante el motor de base de datos Microsoft Jet. Esta tecnología
proporciona acceso a muchos formatos de base de datos y permite
crear aplicaciones que manejan datos sin necesidad de escribir
código.
Para crear una aplicación de base de datos que
emplee el control Data, se siguen los siguientes
pasos:
- Añadir el control Data al formulario y
establecer las propiedades para especificar la base de datos y
la tabla desde la cual se obtendrán los
datos. - Añadir controles enlazados a datos al
formulario, y establecer las propiedades para enlazar los
controles al control Data para que los datos puedan ser
mostrados.
Uso de Controles Enlazados a Datos
Cuando un control que ha colocado en un formulario se
enlaza a datos, se muestran automáticamente los datos de
la base de datos en el control enlazado. Si un usuario cambia los
datos de un control enlazado, dichos cambios se
actualizarán automáticamente en la base de datos en
cuanto el usuario se desplace a otro registro. Muchos controles
intrínsecos o estándar de Visual Basic permiten ser
enlazados a datos, como es el caso de los controles
CheckBox, Image, Label, PictureBox,
TextBox, ListBox, ComboBox y los
contenedores OLE.
La siguiente ilustración es un ejemplo de un formulario
que contiene un control Data y dos controles
enlazados.
Establecer las Propiedades del Control
Data
Los siguientes pasos describen como conectar un control
Data a una base de datos.
- Especificar las base de datos a la cual se quiere
acceder estableciendo la propiedad DatabaseName al
nombre de la base de datos. - Para especificar que registros recuperar, establecer
la propiedad RecordSource al nombre de la tabla dentro
de la base de datos, o a una cadena SQL.
Nota: Para acceder a una base de datos
dBase, Paradox, o Btrieve, se debe establecer la propiedad
DatabaseName a la carpeta que contiene los archivos de la
base de datos, y la propiedad Connect al tipo apropiado de
base de datos.
Enlazar Controles
Después de establecer los valores de las
propiedades para el control Data, es necesario enlazar al
control Data controles individuales y después
especificar qué campo de la tabla mostrará cada
control.
- En tiempo de diseño, establecer la propiedad
DataSource del control enlazado a datos al control
Data. - En tiempo de diseño o en tiempo de
ejecución, especificar que campo se desea mostrar en el
control enlazado estableciendo la propiedad
DataField.
La propiedad DataField puede ser establecida en
tiempo de diseño o en tiempo de
ejecución.
Usar las Propiedades y Métodos del Control
Data
Para especificar los datos que se desean recuperar, se
debe establecer las propiedades DatabaseName y
RecordSource de un control Data. Además, se
pueden establecer las siguientes propiedades y
métodos.
La Propiedad Connect
Esta propiedad especifica el tipo de base de datos a
abrir. Puede incluir argumentos tales como un nombre de usuario
(user ID) y una contraseña.
La Propiedad Exclusive
La propiedad Exclusive determina si se tiene o no
un uso exclusivo de la base de datos. Si esta propiedad se
establece a True, y luego se abre sin problemas la
base de datos, ninguna otra aplicación podrá
abrirla hasta que sea cerrada.
La Propiedad ReadOnly
Esta propiedad determina si se puede o no actualizar o
grabar cambios en la base de datos. Si no se tiene planeado hacer
cambios en la base de datos, es más eficiente establecer
la propiedad ReadOnly a True.
La Propiedad Recordset
La propiedad Recordset es un objeto que contiene
el conjunto de registros devueltos por el control Data.
Esta propiedad contiene a su vez propiedades y métodos que
pueden ser usados para trabajar con los registros
devueltos.
Las Propiedades BOFAction y EOFAction
Estas propiedades determinan que acción
tomará el control Data cuando las propiedades
BOF o EOF del recordset tomen como valor
True.
Por ejemplo, si la propiedad EOFAction del
control Data es establecida a vbActionAddNew, y se emplea
el control Data para desplazarse, una vez que se pase el
último registro, el control Data
automáticamente ejecutará el método
AddNew de modo que se pueda añadir un nuevo
registro.
El Método Refresh
El método Refresh renueva el objeto
Recordset. Si se cambia la propiedad RecordSource
en tiempo de ejecución, se debe invocar al método
Refresh para renovar el recordset.
El siguiente código muestra como emplear el
método Refresh.
Data1.RecordSource = "SELECT * FROM Empleados " &
_
"WHERE [IdEmpleado] = " & txtIdEmp.Text
Data1.Refresh
El Objeto Recordset
En una aplicación de base de datos, los usuarios
trabajan con el control Data para desplazarse entre
registros dentro de la base de datos. Los usuarios pueden hacer
clic en los botones del control Data para avanzar o
retroceder registro a registro o para ir directamente al primer o
al último registro.
¿Qué es un Recordset?
Todo el conjunto de registros al que hace referencia un
control Data se denomina conjunto de registros o
Recordset. El Recordset se almacena en la memoria,
transfiriéndose al disco si es necesario.
Para manipular el Recordset, se emplea la
propiedad Recordset del control Data. El
Recordset contiene el registro actual. La
información del registro actual es mostrada por los
controles enlazados. Se puede cambiar la posición del
registro actual haciendo clic en el control Data o
escribiendo código que emplee métodos del objeto
Recordset.
Determinar los límites de
un Recordset
Si utiliza código para cambiar la posición
del registro actual, debe comprobar las propiedades EOF y
BOF del objeto Recordset para determinar el inicio
y el final del mismo. Cuando se desplace al registro EOF o
al BOF, se ejecutará la acción indicada por
el valor de la propiedad BOFAction o
EOFAction.
Por ejemplo, se puede establecer la propiedad
EOFAction para añadir un nuevo registro
automáticamente. Si se establece la propiedad
EOFAction a EOF, ninguna acción será
tomada cuando se desplace al registro EOF. Cuando se
desplace pasando un registro los registros BOF o
EOF, se producirá un error en tiempo de
ejecución.
En la siguiente ilustración se muestra
cómo las propiedades BOF y EOF determinan
los límites del objeto Recordset.
Para emplear el objeto Recordset de un control
Data determinado, se debe especificar la propiedad
Recordset del control Data, como se muestra en el
siguiente código.
Data1.Recordset.MoveNext 'Mueve el registro actual al
siguiente
If Data1.Recordset.EOF Then
Data1.Recordset.MoveLast
Uso de las Propiedades y Métodos de un
Recordset
Utilice los métodos y las propiedades del objeto
Recordset para recuperar información del conjunto
de registros, desplazarse por los registros y agregar, actualizar
o eliminar registros.
Las Propiedades BOF y EOF
Las propiedades BOF y EOF del objeto
Recordset indican si la posición del registro
actual es antes del primer registro o después del
último registro dentro del conjunto de registros. Si no
hay registros en el recordset, entonces el valor de las
propiedades BOF y EOF es True.
El Método AddNew del Recordset
Para agregar un nuevo registro a un recordset, se emplea
el método AddNew. Cuando se ejecuta el
método AddNew, Visual Basic limpia los controles
enlazados y establece la propiedad EditMode del control
Data a dbEditAdd.
El nuevo registro no será añadido a la
base de datos hasta que sea ejecutado explícitamente un
método UpdateRecord o Update, o hasta que el
usuario se mueva a otro registro.
El siguiente código muestra como agregar un nuevo
registro a un recordset.
Private Sub cmdAgregar_Click()
Data1.Recordset.AddNew
El Método UpdateRecord del Control
Data
El método UpdateRecord se emplea para
grabar el registro actual a una base de datos. El siguiente
código muestra como grabar el registro actual y actualizar
la base de datos.
Private Sub cmdGrabar_Click()
Data1.UpdateRecord
El Método CancelUpdate del Control
Data
El método CancelUpdate se emplea para
cancelar un método AddNew o Edit y renovar o
refrescar los controles enlazados con datos del
recordset.
Por ejemplo, si un usuario ha modificado los campos de
un formulario, pero todavía no los ha actualizado, el
método CancelUpdate refrescará los campos
con los datos originales del recordset.
Si un usuario selecciona un botón Agregar
de un formulario, y luego decide no agregar el registro, el
método CancelUpdate cancelará la
operación y visualizará el registro
actual.
El siguiente código muestra como cancelar la
agregación o edición de un registro.
Private Sub cmdCancelar_Click()
Data1.CancelUpdate
El Método Delete del Recordset
Para eliminar un registro de una base de datos, se
emplea el método Delete. El registro eliminado
permanecerá como el registro actual hasta que el usuario
se mueva a un registro diferente, como se muestra en el siguiente
código.
Private Sub cmdEliminar_Click()
Data1.Recordset.Delete
Data1.Recordset.MoveNext
If Data1.Recordset.EOF Then
Data1.Recordset.MoveLast
End If
End Sub
Nota: La base de datos Neptuno tiene
definidas reglas de integridad referencial que impiden eliminar
registros relacionados.
Uso del Asistente para Formularios de
Datos
El Asistente para Formularios de Datos es una utilidad de
Visual Basic que genera formularios de datos simples que emplean
el control Data. Se puede emplear el Asistente para
Formularios de Datos para construir rápidamente
formularios para una aplicación de base de
datos.
Para cargar el Asistente para Formularios de Datos, se
emplea la orden Administrador de Complementos del
menú Complementos.
Uso de los Eventos del Control Data
El control Data proporciona tres eventos que
puede utilizar para mejorar la aplicación de base de
datos: Validate, Error y Reposition. Dichos eventos permiten
omitir parte del comportamiento predeterminado del control
Data.
Usar el Evento Validate
Utilice el evento Validate para comprobar los datos
antes de guardar un registro en la base de datos. Este evento se
produce justo antes de que Visual Basic escriba en la base de
datos los cambios procedentes de los controles enlazados y de que
vuelva a colocar el puntero del registro actual en otro registro
de la base de datos. Puede utilizar el evento Validate para pedir
al usuario que confirme los cambios realizados.
Sintaxis
El evento Validate tiene la siguiente
sintaxis:
Private Sub Data1_Validate (index As
Integer, action As Integer, save As
Integer)
El Argumento Action
El argumento action indica la operación
que provocó el evento Validate. El evento Validate se
produce como resultado de realizar las operaciones
siguientes:
- MoveFirst, MovePrevious,
MoveNext, MoveLast - AddNew
- Update
- Delete
- Find
- Establecer la propiedad Bookmark
- Cerrar la base de datos
- Descargar el formulario
Para cancelar cualquiera de estas acciones, asigne al
argumento action el valor
vbDataActionCancel.
El Argumento Save
El argumento save indica si va a guardarse o no
el registro. Si save es True, los datos enlazados
han cambiado. Para cancelar la acción de guardar puede
asignar a save el valor False.
El siguiente código pide al usuario que confirme
los cambios hechos a la base de datos. Si el usuario responde No,
los cambios serán cancelados.
Usar el Evento Reposition
Utilice el evento Reposition para modificar la
apariencia de un formulario o realizar una acción
necesaria cuando se desplace a un nuevo registro.
Este evento tiene lugar cuando Visual Basic desplaza el
puntero del registro actual a otro registro de la base de datos.
También se produce la primera vez que se abre la base de
datos.
Modificar la apariencia de un
formulario
Para cambiar la manera en que un formulario muestra
información basándose en el registro seleccionado
en ese momento hay que utilizar el evento Reposition. Por
ejemplo, puede modificar el título del control Data
de forma que se muestre el registro número
n.
Para ver el número del registro actual, utilice
la propiedad AbsolutePosition del objeto Recordset.
El número de registro es relativo a cero, por lo que el
primer registro es el 0.
El siguiente código muestra como visualizar el
número del registro actual.
Private Sub Data1_Reposition()
Data1.Caption = "Registro Nº" &
Data1.Recordset.AbsolutePosition + 1
End Sub
Tratar los cambios al desplazarse a un nuevo
registro
Cuando un usuario se desplaza a un nuevo registro
mediante el control Data, puede que los datos del
formulario tengan que presentarse de una forma distinta en el
caso del nuevo registro.
Por ejemplo, es posible que en un formulario que muestre
registros de empleados haya distintas opciones dependiendo de
sí los empleados son fijos, temporales o si trabajan por
horas. Cada registro mostrará la información sobre
un empleado distinto, cuyas opciones pueden no ser las mismas
para todos los registros. Para que se seleccione la opción
correcta para cada registro, escriba código en el evento
Reposition.
El código siguiente utiliza el evento Reposition
para modificar la apariencia de un formulario.
Esta ilustración muestra el formulario basado en
el código anterior.
Usar el Evento Error
El evento Error tiene lugar cuando un usuario
interactúa con el control Data y se produce un
error de acceso a datos. Utilice el evento Error para agregar
tratamiento de errores personalizado al control
Data.
Por ejemplo, si un usuario modifica un campo y
después hace clic en el control Data para
desplazarse al siguiente registro, el control Data
actualizará el registro actual. Si se produce un error de
acceso a datos durante la actualización, se
producirá el evento Error.
Los valores de los campos enlazados no cambian tras
producirse un error. El usuario puede corregir los valores y
hacer clic en el control Data para tratar de actualizar
nuevamente el registro.
Mostrar un mensaje de error
personalizado
Si no coloca código para tratar errores en el
evento Error y se produce un error cuando un usuario
interactúa con el control Data, Visual Basic
muestra el mensaje de error y el programa continúa
ejecutándose.
Si no desea que se muestre el mensaje de error
estándar, puede asignar al argumento Response el valor 0 y
mostrar un mensaje de error personalizado como se muestra en el
siguiente código.
Uso de Controles Enlazados a Datos
ActiveX
Además de los controles enlazados
intrínsecos, Visual Basic ofrece varios controles
ActiveX enlazados a datos. En esta parte del curso se
describen algunos controles ActiveX enlazados a datos
avanzados.
Usar el Control DBGrid 
El control de cuadrícula enlazada a datos
(control DBGrid) permite que los usuarios de su
aplicación de base de datos trabajen con varios registros
a la vez.
Mostrar múltiples
registros
DBGrid es un control ActiveX que muestra una
serie de filas y columnas que representan registros y campos de
un objeto Recordset. Cuando asigne a la propiedad
DataSource del control DBGrid un control
Data, el control DBGrid se llenará
automáticamente de datos y se establecerán
automáticamente sus encabezados de columna a partir del
conjunto de registros del control Data.
Al contrario que la mayoría de los controles
enlazados a datos, el control DBGrid le permite ver y
modificar varios registros simultáneamente.
En la siguiente ilustración se muestra un
formulario que utiliza un control DBGrid para presentar
registros procedentes de la base de datos Neptuno.
- Para añadir el control DBGrid a un
proyecto
- Hacer clic en la orden Componentes del
menú Proyecto. - En la ficha Controles, seleccionar
Microsoft Data Bound Grid Control, y luego hacer clic en
Aceptar.
El control DBGrid tiene varias propiedades que
especifican cómo se comporta el control. Por ejemplo, si
asigna a la propiedad AllowUpdate el valor True, un
usuario puede modificar los datos del control. También
puede establecer propiedades para columnas individuales del
control DBGrid.
Puede cambiar el título de la columna, cambiar el
campo de datos al que se enlaza la columna, agregar valores
predeterminados, etc.
- Para establecer propiedades de
columnas
- Oprima el botón secundario del ratón
sobre el control DBGrid. - Haga clic en la orden Propiedades.
- Haga clic en Columnas.
Puede cambiar el título de la columna, cambiar el
campo de datos al que se enlaza la columna, agregar valores
predeterminados, etc.
Para establecer los encabezados de las columnas del
control DBGrid, luego de haberlo enlazado a un control
Data, oprima el botón secundario del ratón
sobre el control en tiempo de diseño, y luego haga clic en
la orden Recuperar campos.
Obtener y establecer el texto de la celda
actual
Utilice la colección Columns del control
DBGrid para recuperar el texto de la celda seleccionada
actualmente en tiempo de ejecución. Por
ejemplo:
MsgBox DBGrid1.Columns(DBGrid1.Col).Text
Para cambiar la información del control DBGrid,
cambie el objeto Recordset asociado. Por ejemplo, si el control
DBGrid está enlazado al recordset Data1, se
ejecutaría el siguiente código:
Data1.Recordset.Edit
Data1.Recordset.Fields("NombreProducto") = "Disco
duro"
Data1.Recordset.Update
Usar el evento BeforeUpdate
El evento BeforeUpdate tiene lugar antes de que se
muevan datos desde un control DBGrid al búfer de
copia del control Data. Puede validar los datos y cancelar
la actualización si es necesario.
Usar el Control MSFlexGrid 
El control MSFlexGrid proporciona
características avanzadas para la presentación de
datos en una cuadrícula. Es similar al control
DBGrid aunque, cuando se enlaza a un control Data,
el control MSFlexGrid muestra datos de sólo
lectura. Puede utilizar el control MSFlexGrid para
combinar filas o columnas de información y así
agrupar la información relacionada.
En la siguiente ilustración se muestran registros
agrupados por Id. de pedido en la tabla Detalles de
pedidos.
- Para combinar celdas
- Establezca la propiedad MergeCells a un valor
diferente a cero. - Establezca las propiedades arreglo MergeRow()
y MergeCol() a True para las filas y columnas que
desee combinar.
Por ejemplo, para combinar las celdas en la tabla
Detalles de pedidos, añada el siguiente código al
formulario donde se encuentra el control
MSFlexGrid.
Private Sub Form_Load()
MSFlexGrid1.MergeCells = flexMergeFree
MSFlexGrid1.MergeCol(0) = True
End Sub
Usar el Control DBCombo 
Puede utilizar el control de cuadro de lista enlazado a
datos (DBList) o el cuadro combinado enlazado a datos
(DBCombo) para presentar automáticamente una lista
de valores de un Recordset. Esto resulta útil para
proporcionar valores válidos al usuario.
Obtener información de una tabla de
búsqueda
También puede utilizar estos controles en
aplicaciones de "tabla de búsqueda".
Por ejemplo, puede presentar una lista de nombres de
categoría válidos (en vez de Id.) y utilizar el Id.
correspondiente cuando el usuario agregue o modifique
datos.
La ilustración siguiente muestra un formulario
que utiliza el control DBCombo para presentar nombres de
categorías de la tabla Productos.
Establecer propiedades del control
DBCombo
Para determinar el valor que se presenta en el control
DBCombo, asigne a la propiedad RowSource un nombre
de control Data y a la propiedad ListField un
nombre de campo.
El cuadro combinado enlazado a datos contiene todos los
valores de ese campo. Para determinar qué campo de la base
de datos se actualiza cuando un usuario cambia un valor,
establezca las propiedades DataSource y DataField.
Para establecer la relación entre la tabla que contiene
los valores de búsqueda y la tabla que se está
modificando realmente, establezca la propiedad
BoundColumn.
Jaime Oswaldo Montoya Guzmán
Lugar y fecha de nacimiento: San Salvador, 16 de julio de
1986.
Centro de estudios: Universidad
Católica de Occidente
Carrera: Ingeniería en Sistemas
Informáticos.
Ciudad: Santa Ana.
País: El Salvador.
Fecha de envío del trabajo: 29 de
octubre de 2005.
 Página anterior | Volver al principio del trabajo | Página siguiente  |