- Objetivos
- Nombres Automáticos en
VB - Valores
- Resumen de tipos de
datos - Subrutinas y
Funciones - For…Next
(Instrucción) - Mejoras a
la interfaz
- Facilidad para extender e interactuar con otras
aplicaciones. - Llamadas al API
- Msdn.Microsoft.com
- Soporte de componentes de terceros
- Contiene Herramientas
integradas al ambiente
para depuración e incremento de productividad.
Ediciones de VB
- Aprendizaje
- Profesional
- Empresarial
Edición de Aprendizaje
- Creación de aplicaciones para Windows
95/98/Me/NT/XP - Controles Intrínsecos
- Controles Adicionales
- Curso de "Aprenda Visual Basic
6.0 Ya" - Librería de documentación en Pantalla
Edición Profesional
- Todo lo de la Edición de Aprendizaje,
menos el curso de visual basic - Controles Adicionales
- Generación de Controles
- Generación de Aplicaciones para
IIS - Herramientas para modelado y acceso a datos.
Edición Empresarial
- Todo lo de la Edición Profesional
- Generación de Aplicaciones
Distribuidas - Aplicaciones que se ejecutan en un Navegador de
Internet.
- Aplicaciones que se ejecutan en un Navegador de
- Componentes del BackOffice
- BackOffice = Suite de Programas que se instalan en un servidor para poder
ofrecer diferentes servicios.
- SQL Server
- Para el Manejo y Administración de Bases de
Datos.
- Para el Manejo y Administración de Bases de
- MTS (Microsoft Transaction Server)
- IIS (Internet Information Server)
- SNA (System Network Architecture)
- Visual Source Safe
- ASP (Active Server Pages)
- BackOffice = Suite de Programas que se instalan en un servidor para poder
Ejemplo de programación en base a Eventos
1.5.1 Nombres
Automáticos en VB
Prefijos
Para ver el gráfico seleccione la
opción ¨Descargar
trabajo¨
del menú superior
Ejemplo
lblSalir = Etiqueta con el Nombre Salir.
MsgBox (Función)
Muestra un mensaje en un cuadro de diálogo,
espera a que el usuario haga clic en un botón y devuelve
un tipo Integer correspondiente al botón elegido por el
usuario.
Sintaxis
MsgBox(prompt[, buttons][, title][, helpfile,
context])
La sintaxis de la función MsgBox consta de
estos argumentos con
nombre:
Para ver
el gráfico seleccione la opción ¨Descargar
trabajo¨ del menú superior
El argumento
buttons tiene estos valores:
Para ver
el gráfico seleccione la opción ¨Descargar
trabajo¨ del menú superior
El primer grupo de
valores (0 a 5) describe el número y el tipo de los
botones mostrados en el cuadro de diálogo; el segundo
grupo (16, 32, 48, 64) describe el estilo del icono, el tercer
grupo (0, 256, 512) determina el botón predeterminado y el
cuarto grupo (0, 4096) determina la modalidad del cuadro de
mensajes. Cuando se suman números para obtener el valor final
del argumento buttons, se utiliza solamente un número de
cada grupo.
Nota Estas constantes
las especifica Visual Basic for
Applications. Por tanto, el nombre de las mismas puede utilizarse
en cualquier lugar del código
en vez de sus valores reales.
Valores devueltos
Para
ver el gráfico seleccione la opción ¨Descargar
trabajo¨ del menú superior
Comentarios
Cuando se proporcionan tanto helpfile como context, el
usuario puede presionar F1 para ver el tema de Ayuda
correspondiente al context. Algunas aplicaciones
host, por ejemplo Microsoft
Excel, también agregan automáticamente un
botón Ayuda al cuadro de diálogo.
Si el cuadro de diálogo cuenta con un
botón Cancelar, presionar la tecla ESC tendrá el
mismo efecto que hacer clic en este botón. Si el cuadro de
diálogo contiene un botón Ayuda, se suministra
ayuda interactiva para ese cuadro de diálogo. Sin embargo,
no se devuelve valor alguno hasta que se hace clic en uno de
estos botones.
Nota Si desea especificar más
que el primer argumento con nombre, debe utilizar MsgBox en
una expresión.
Si desea omitir algún argumento de
posición, debe incluir el delimitador de coma
correspondiente.
InputBox (Función)
Muestra un mensaje en un cuadro de diálogo,
espera que el usuario escriba un texto o haga
clic en un botón y devuelve un tipo String con el
contenido del cuadro de texto.
Sintaxis
InputBox(prompt[, title][, default][, xpos][, ypos][,
helpfile, context])
La sintaxis de la función InputBox consta de
estos argumentos con
nombre:
Para ver
el gráfico seleccione la opción ¨Descargar
trabajo¨ del menú superior
Comentarios
Cuando se especifica tanto helpfile como context, el
usuario puede presionar F1 para ver el tema de Ayuda
correspondiente a context. Algunas aplicaciones
host, por ejemplo, Microsoft Excel,
también agregar automáticamente un botón
Ayuda al cuadro de diálogo. Si el usuario hace clic en
Aceptar o presiona Entrar , la función InputBox devuelve
lo que haya en el cuadro de texto. Si el usuario hace clic en
Cancelar, la función devuelve una cadena de caracteres de
longitud cero ("").
Nota Si desea especificar más
que el primer argumento con nombre, debe utilizar InputBox en
una expresión.
Si desea omitir algunos argumentos
de posición, debe incluir el delimitador de coma
correspondiente.
Descripción del alcance de las
variables
El alcance de una variable define qué partes del
código son conscientes de su existencia. Cuando declara
una variable en un procedimiento,
sólo el código de dicho procedimiento puede tener
acceso o modificar el valor de la variable; tiene un alcance que
es local al procedimiento. A veces, sin embargo, se necesita usar
una variable con un alcance más general, como aquella cuyo
valor está disponible para todos los procedimientos
del mismo módulo o incluso para todos los procedimientos
de toda la aplicación. Visual Basic le permite especificar
el alcance de una variable cuando la declara.
Establecer el alcance de las variables
Dependiendo de cómo se declara, una variable
tiene como alcance un procedimiento (local) o un
módulo.
Para ver el gráfico seleccione la
opción ¨Descargar trabajo¨ del menú
superior
Variables utilizadas en un procedimiento
Las variables a
nivel de procedimiento sólo se reconocen en el
procedimiento en el que se han declarado. Se las conoce
también como variables locales. Se declaran mediante las
palabras clave Dim o Static. Por ejemplo:
Dim intTemp As Integer
–o bien–
Static intPermanent As Integer
Los valores de variables locales declaradas con Static
existen mientras se ejecuta la aplicación, mientras que
las variables declaradas con Dim sólo existen mientras se
ejecuta el procedimiento.
Las variables locales resultan una elección
apropiada para cálculos temporales. Por ejemplo, puede
crear una docena de procedimientos distintos que contengan una
variable llamada intTemp. Como cada intTemp se ha declarado como
una variable local, cada procedimiento sólo reconoce su
propia versión de intTemp. Cualquier procedimiento puede
alterar el valor de su intTemp local sin que ello afecte a las
variables intTemp de los demás procedimientos.
Variables utilizadas en un módulo
De forma predeterminada, una variable a nivel de
módulo está disponible para todos los
procedimientos del módulo, pero no para el código
de otros módulos. Cree variables a nivel de módulo
declarándolas con la palabra clave Private en la
sección Declaraciones al principio del módulo. Por
ejemplo:
Private intTemp As Integer
A nivel de módulo, no hay diferencia entre
Private y Dim, pero es preferible Private porque contrasta con
Public y hace que el código sea más fácil de
comprender.
Variables utilizadas por todos los
módulos
Para hacer que una variable a nivel de módulo
esté disponible para otros módulos, utilice la
palabra clave Public para declarar la variable. Los valores de
las variables públicas están disponibles para todos
los procedimientos de la aplicación. Al igual que todas
las variables a nivel de módulo, las variables
públicas se declaran en la sección Declaraciones al
principio del módulo. Por ejemplo:
Public intTemp As Integer
Nota No puede declarar variables
públicas en un procedimiento, sólo en la
sección Declaraciones de un módulo.
Para obtener más información Para obtener
más información acerca de las variables, vea "Temas
avanzados sobre variables" en este capítulo.
Dim (Instrucción)
Declara variables y
les asigna espacio de almacenamiento.
Sintaxis
Dim [WithEvents] nombre_variable[([subíndices])]
[As [New] tipo] [, [WithEvents]
nombre_variable[([subíndices])] [As [New] tipo]] . .
.
La sintaxis de la instrucción Dim consta de las
siguientes partes:
Para ver el
gráfico seleccione la opción ¨Descargar
trabajo¨ del menú superior
Comentarios
Las variables declaradas con Dim en el nivel de
módulo están disponibles para
todos los procedimientos disponibles sólo dentro de
ese módulo.
En el nivel de
procedimiento, las variables sólo
están disponibles dentro de ese procedimiento.
Utilice la instrucción Dim en el nivel de
módulo o de procedimiento para declarar el tipo de datos
de una variable. Por ejemplo, la siguiente instrucción
declara una variable como Integer.
Dim NúmeroDeEmpleados As Integer
También puede utilizar una instrucción Dim
para declarar el tipo de objeto de una variable. La siguiente
línea declara una variable para una nueva instancia de una
hoja de
cálculo.
Dim X As New Worksheet
Si no utiliza la palabra clave New al declarar una
variable de objeto, la variable que se refiere al objeto debe
asignarse a un objeto existente mediante la instrucción
Set antes de su uso. Hasta que se le asigne un objeto, la
variable de objeto declarada tiene el valor especial Nothing, el
cual indica que no se refiere a ninguna instancia en particular
de un objeto.
También puede utilizar la instrucción Dim
con paréntesis vacíos para declarar matrices
dinámicas. Después de declarar una matriz
dinámica, use la instrucción ReDim
dentro de un procedimiento para definir el número de
dimensiones y elementos de la matriz. Si intenta volver a
declarar una dimensión para una variable de matriz cuyo
tamaño se ha especificado explícitamente en una
instrucción Private, Public o Dim, ocurrirá un
error.
Si no especifica un tipo de datos o un tipo de objeto y
no existe ninguna instrucción Deftipo en el módulo,
la variable predeterminada será Variant.
Cuando se inicializan variables, una variable
numérica se inicializa con 0, una cadena de longitud
variable se inicializa con una cadena de longitud 0 ("") y una
cadena de longitud fija se llena con ceros. Las variables Variant
se inicializan con Empty. Cada
elemento de una variable de un tipo definido por el usuario se
inicializa como si fuera una variable distinta.
Nota Cuando utiliza la
instrucción Dim en un procedimiento, generalmente pone la
instrucción Dim al principio del mismo.
Public (Instrucción)
Se usa en el nivel de
módulo para declarar variables
públicas y asignarles espacio para
almacenamiento.
Sintaxis
Public [WithEvents]
nombre_variable[([subíndices])] [As [New] tipo]
[,[WithEvents] nombre_variable[([subíndices])] [As [New]
tipo]] . . .
La sintaxis de la instrucción Public consta de
las siguientes partes:
Para ver el gráfico seleccione la
opción ¨Descargar trabajo¨ del menú
superior
Comentarios
Las variables declaradas mediante la instrucción
Public están disponibles para todos los procedimientos en
todos los módulos de todas las aplicaciones, a menos que
Option Private Module esté en efecto; en este caso, las
variables sólo son públicas dentro del
proyecto
en el que residen.
Precaución La instrucción
Public no se puede usar en un módulo de clase para
declarar una variable de cadena de longitud fija.
Use la instrucción Public para declarar el tipo
de datos de una variable. Por ejemplo, la instrucción
siguiente declara una variable como de tipo Integer:
Public NúmeroDeEmpleados As Integer
Utilice también la instrucción Public para
declarar el tipo de objeto de una variable. La instrucción
siguiente declara una variable para una nueva instancia de una
hoja de cálculo.
Public X As New Worksheet
Si no utiliza la palabra clave New al declarar una
variable de objeto, la variable que se refiere a un objeto debe
asignarse a un objeto existente mediante la instrucción
Set antes de que se pueda usar. Hasta que se le asigne un objeto,
la variable de objeto declarada tiene el valor especial Nothing,
el cual indica que no se refiere a ninguna instancia en
particular de un objeto.
También puede utilizar una instrucción
Public con paréntesis vacíos para declarar matrices
dinámicas. Después de declarar una matriz
dinámica, use la instrucción ReDim dentro de un
procedimiento para definir el número de dimensiones y
elementos de la matriz. Si intenta volver a declarar un
dimensión para una matriz cuyo tamaño se ha
especificado explícitamente en una instrucción
Private, Public o Dim, ocurrirá un error.
Si no especifica un tipo de datos o un tipo de objeto y
no existe una instrucción Deftipo en el módulo, la
variable es Variant de manera predeterminada.
Cuando se inicializan las variables, una variable
numérica se inicializa a 0, una cadena de longitud
variable se inicializa a una cadena de longitud cero ("") y una
cadena de longitud fija se rellena con ceros. Las variables
Variant se inicializan a Empty. Cada
elemento de una variable de un tipo definido por el usuario se
inicializa como si fuera una variable distinta.
La tabla siguiente muestra
los tipos de
datos compatibles, incluyendo el tamaño
de almacenamiento y el intervalo.
Para ver el gráfico seleccione la opción
¨Descargar trabajo¨ del menú superior
Nota Las matrices de
cualquier tipo de datos requieren 20 bytes de memoria
más cuatro bytes para cada dimensión de matriz,
más el número de bytes que ocupan los propios
datos. Puede calcular la memoria que
ocupan los datos multiplicando el número de elementos de
datos por el tamaño de cada elemento. Por ejemplo, los
datos de una matriz unidimensional que consten de cuatro
elementos de datos tipo Integer de dos bytes cada uno, ocupan
ocho bytes. Los ocho bytes que requieren los datos más los
24 bytes necesarios para la matriz suman un requisito total de
memoria de 32 bytes para dicha matriz.
Un tipo Variant que contiene una matiz requiere 12 bytes
más que la matriz por sí sola.
Load (Instrucción)
Carga en memoria un formulario o un control.
Sintaxis
Load objeto
El marcador de posición objeto es el nombre de un
objeto Form, un objeto MDIForm o un elemento de una matriz de
controles para cargar.
Comentarios
No es necesario usar la instrucción Load con
formularios a
menos que desee cargar un formulario sin presentarlo. Cualquier
referencia a un formulario (excepto en una instrucción Set
o If…TypeOf) lo carga automáticamente si no está
ya cargado. Por ejemplo, el método
Show carga los formularios antes de presentarlos. Una vez cargado
el formulario, la aplicación puede alterar sus propiedades
y controles, sea o no visible actualmente el formulario. En
algunas circunstancia, puede que desee cargar todos los
formularios en la inicialización y presentarlos
después cuando sean necesarios.
Cuando Visual Basic carga un objeto Form, establece las
propiedades del formulario a sus valores iniciales y
después ejecuta el procedimiento de evento Load. Cuando se
inicia una aplicación, Visual Basic carga y presenta
automáticamente el formulario inicial de la
aplicación.
Si carga un objeto Form cuya propiedad
MDIChild es True (es decir, el formulario secundario) antes de
cargar el objeto MDIForm, el objeto MDIForm se carga
automáticamente antes que el formulario secundario. Los
formularios MDI
secundarios no pueden estar ocultos y, por
tanto, son visibles inmediatamente después de terminar el
procedimiento de evento Form_Load.
No es necesario cargar, mostrar o descargar los cuadros
de diálogo estándar producidos por funciones de
Visual Basic como MsgBox y InputBox; se pueden invocar
directamente.
Hide (Método)
Oculta un objeto MDIForm o Form pero no lo
descarga.
Sintaxis
objeto.Hide
El marcador de posición objeto representa
una expresión de
objeto que da como resultado un objeto de la
lista Se aplica a. Si se omite objeto, se supone que objeto es el
formulario que tenga el enfoque.
Comentarios
Cuando se oculta un formulario, se quita de la pantalla
y su propiedad Visible queda establecida a False. Los controles
de un formulario oculto no son accesibles para el usuario, pero
están disponibles para la aplicación de Visual
Basic en ejecución y para otros procesos que
se estén comunicando con la aplicación mediante
DDE, así como para los eventos del
control Timer.
Cuando se oculta un formulario, el usuario no puede
interactuar con la aplicación hasta que el código
del procedimiento de evento que ha provocado la ocultación
del formulario haya terminado de ejecutarse.
Si el formulario no está cargado cuando se llama
al método Hide, el método Hide carga el formulario
pero no lo presenta.
Nota Al cerrar un formulario modal que
se ha abierto desde otro formulario modal, el siguiente
código funcionaba en versiones anteriores de Visual
Basic:
Me.Hide
Me.Hide ' Esto ahora provoca un error.
En versiones actuales de Visual Basic, este
código falla en el segundo Me.Hide. Puede sustituir
Me.Hide con Me.Visible = False como se muestra a
continuación:
Me.Visible = False
Me.Visible = False ' No sucede ningún
error.
Unload (Instrucción)
Descarga de memoria un formulario o un
control.
Sintaxis
Unload objeto
El marcador de posición objeto es el nombre de un
objeto Form o de un elemento de una matriz de controles
para descargar.
Comentarios
La descarga de un formulario o de un controle puede ser
necesaria o conveniente en aquellos casos en los que la memoria
utilizada sea necesaria para alguna otra tarea o cuando sea
necesario restablecer las propiedades a sus valores
originales.
Antes de descargar un formulario se produce el evento
Query_Unload, seguido del procedimiento de evento Form_Unload. Si
establece el argumento cancelar a True en alguno de estos eventos
no se descargará el formulario. En los objetos MDIForm se
produce el procedimiento de evento Query_Unload del objeto
MDIForm, seguido del procedimiento de evento Query_Unload y del
procedimiento de evento Form_Unload de cada formulario
secundario
MDI; finalmente se produce el procedimiento de
evento Form_Unload del objeto MDIForm.
Cuando se descarga un formulario, todos los controles
colocados en el formulario en tiempo de
ejecución no son accesibles. Los
controles colocados en el formulario en tiempo de
diseño permanecen intactos; sin embargo,
cualquier cambio en
tiempo de
ejecución sobre dichos controles y sus propiedades se
pierden cuando se vuelve a cargar el formulario. También
se pierden todos los cambios realizados en las propiedades del
formulario. El acceso a algún control del formulario hace
que éste se vuelva a cargar.
Nota Cuando se descarga un formulario,
sólo se descarga el componente mostrado. El código
asociado al módulo del formulario permanece en
memoria.
Con la instrucción Unload sólo se pueden
descargar los elementos de las matrices de controles agregados a
un formulario en tiempo de ejecución. Las propiedades de
los controles descargados se reinicializan cuando se cargan de
nuevo los controles.
Show (Método)
Presenta un objeto MDIForm o Form. No acepta
argumentos con
nombre.
Sintaxis
objeto.Show estilo, formularioPropietario
La sintaxis del método Show consta de las
siguientes partes:
Para ver el
gráfico seleccione la opción ¨Descargar
trabajo¨ del menú superior
Comentarios
Si el formulario especificado no está cargado
cuando se invoca el método Show, Visual Basic lo carga
automáticamente.
Cuando Show presenta un formulario no modal,
continúa con la ejecución del código que
haya a continuación. Cuando Show presenta un formulario
modal, el código que hay a continuación no se
ejecuta hasta que el formulario se oculta o se
descarga.
Cuando Show presenta un formulario modal, no hay
entradas (de teclado o del
mouse) excepto
sobre los objetos del formulario modal. El programa debe
ocultar o descargar los formularios modales (normalmente como
respuesta a alguna acción
del usuario) antes de que pueda producirse la entrada en otro
formulario. Los formularios MDIForm no pueden ser
modales.
Aunque los demás formularios de la
aplicación están deshabilitados cuando se presenta
un formulario modal, los de las demás aplicaciones no lo
están.
El formulario inicial de una aplicación se
muestra automáticamente después de invocar su
evento Load.
He aquí un ejemplo de cómo se utiliza el
argumento formularioPropietario con el método
Show:
Private Sub cmdShowResults_Click()
' Muestra un formulario modal llamado
frmResults.
frmResults.Show vbModal, Me
End Sub
SetFocus (Método)
Mueve el enfoque al
control o formulario especificado.
Sintaxis
objeto.SetFocus
El marcador de posición objeto representa
una expresión de
objeto que da como resultado un objeto de la
lista Se aplica a.
Comentarios
El objeto debe ser un objeto Form, un objeto MDIForm o
un control que pueda recibir el enfoque. Después de
invocar el método SetFocus, cualquier entrada del usuario
se dirige al formulario o al control especificado.
El enfoque sólo se puede mover a un formulario o
un control visible. Como un formulario y los controles de un
formulario no son visibles hasta que el evento Load del
formulario ha terminado, no puede usar en su propio evento Load
el método SetFocus para mover el enfoque al formulario que
se está cargando a menos que use primero el método
Show para mostrar el formulario antes de que el procedimiento de
evento Form_Load haya terminado.
Tampoco puede mover el enfoque a un formulario o un
control si su propiedad Enabled es False. Si la propiedad Enabled
se ha establecido a False en tiempo de
diseño, primero debe establecerla a True
antes de poder recibir el enfoque mediante el método
SetFocus.
método
Una acción que un objeto es capaz de realizar.
Por ejemplo, los cuadros de lista tienen métodos
llamados AddItem, RemoveItem y Clear para mantener el contenido
de las listas. Vea también objeto.
propiedad
Un atributo con nombre de un objeto. Las propiedades
definen las características del objeto, como su
tamaño y nombre, o el estado de
un objeto, como habilitado o deshabilitado. Se pueden establecer
propiedades para tablas, columnas, índices, restricciones,
claves y relaciones.
evento
Una acción, reconocida por un objeto, para la
cual puede escribir código de respuesta. Los eventos
pueden estar generados por una acción del usuario, como
hacer clic con el mouse o presionar una tecla, por código
de programa o por el sistema, como
ocurre con los cronómetros.
Form (Objeto), Forms
(Colección)
Un objeto Form es una ventana o un cuadro de
diálogo que forma parte de la interfaz de usuario de una
aplicación.
Forms es una colección
cuyos elementos representan cada formulario cargado en una
aplicación. La colección incluye el formulario
MDI, el formulario secundario
MDI y formularios no MDI de la
aplicación. La colección Forms tiene una
única propiedad, Count, que especifica el número de
elementos de la colección.
Sintaxis
Form
Forms(índice)
El marcador de posición índice representa
un entero entre 0 y Forms.Count – 1.
Comentarios
Puede usar la colección Forms para iterar a
través de todos los formularios cargados en una
aplicación. Identifica una variable global
intrínseca denominada Forms. Puede pasar
Forms(índice) a una función cuyo argumento se
especifica como una clase Forms.
Los formularios tienen propiedades que determinan
aspectos de su apariencia (como posición, tamaño y
color) y aspectos
de su comportamiento
(como si puede ajustar o no su tamaño).
Los formularios también pueden responder a
eventos iniciados por un usuario o desencadenados por el sistema.
Por ejemplo, podría escribir código en el
procedimiento de evento Click de un formulario que permitiera al
usuario cambiar el color de un formulario haciendo clic en
él.
Además de propiedades y eventos, puede emplear
métodos para manipular formularios mediante código.
Por ejemplo, puede usar el método Move para cambiar la
ubicación y el tamaño de un formulario.
Un tipo especial de formulario, el formulario MDI, puede
contener otros formularios llamados formularios secundarios MDI.
Un formulario MDI se crea con el comando Agregar formulario MDI
del menú Proyecto; un
formulario secundario MDI se crea eligiendo Nuevo formulario en
el menú Archivo y, a
continuación, estableciendo la propiedad MDIChild a
True.
Puede crear múltiples instancias de formularios
en código si utiliza la palabra clave New en instrucciones
Dim, Set y Static.
Al diseñar formularios, establezca la propiedad
BorderStyle para definir el borde del formulario y establezca la
propiedad Caption para colocar texto en la barra de
título. En el código puede usar los métodos
Hide y Show para hacer que los formularios sean invisibles o
visibles en tiempo de
ejecución.
Nota Si establece BorderStyle a 0 se
eliminará el borde. Si desea que el formulario tenga borde
sin barra de título, cuadro del menú Control,
botón Maximizar y botón Minimizar, elimine texto de
la propiedad Caption y establezca a False las propiedades
ControlBox, MaxButton y MinButton.
Form es un tipo de datos
Object. Puede declarar variables como de tipo
Form antes de establecerlas a una instancia de un tipo de
formulario que se ha declarado en tiempo de
diseño. Del mismo modo, puede pasar un
argumento a un procedimiento como de tipo Form.
Los formularios pueden actuar como origen en una
conversación DDE, con un control Label, PictureBox o
TextBox proporcionando los datos.
Puede tener acceso a la colección de controles de
un Form mediante la colección Controls. Por ejemplo, para
ocultar todos los controles de un Form puede usar código
similar al siguiente:
For Each Control in Form1.Controls
Control.Visible = False
Next Control
Crear tipos de datos
propios
Se pueden combinar variables de varios tipos diferentes
para crear tipos definidos por el usuario (conocidos como structs
en el lenguaje de
programación C). Los tipos definidos por el usuario
son útiles si se quiere crear una única variable
que registre varias unidades de información
relacionadas.
Puede crear un tipo definido por el usuario con la
instrucción Type, que debe colocar en la sección
Declaraciones del módulo. Los tipos definidos por el
usuario pueden declararse como Private o como Public mediante la
palabra clave apropiada. Por ejemplo:
Private Type MiTipoDeDatos
–o bien–
Public Type MiTipoDeDatos
Por ejemplo, podría crear un tipo definido por el
usuario que registrara información acerca del sistema de
un equipo:
' Declaraciones (de un módulo
estándar).
Private Type SystemInfo
CPU As Variant
Memory As Long
VideoColors As Integer
Cost As Currency
PurchaseDate As Variant
End Type
Declarar variables de un tipo definido por el
usuario
Para el mismo tipo definido por el usuario puede
declarar variables locales, variables privadas de módulo o
variables públicas de módulo:
Dim MiSistema As SystemInfo, SuSistema As
SystemInfo
En la tabla siguiente se ilustra dónde y con
qué alcance puede declarar los tipos definidos por el
usuario y sus variables.
Para ver
el gráfico seleccione la opción ¨Descargar
trabajo¨ del menú superior
Nota Si realiza declaraciones de
variables usando la palabra clave Dim, los tipos definidos por el
usuario en módulo de clase o estándar serán
Public de forma predeterminada. Si quiere que un tipo definido
por el usuario sea privado, asegúrese de declararlo usando
la palabra clave Private.
Asignar y recuperar valores
Asignar y recuperar los valores de los elementos de esta
variable es similar a establecer y obtener
propiedades:
MiSistema.CPU =
"486"
If MiSistema.PurchaseDate > #1/1/92# Then
También puede asignar una variable a otra si
ambas son del mismo tipo definido por el usuario. En la
línea de código siguiente se asignan todos los
elementos de una variable a los mismos elementos de la otra
variable.
SuSistema = MiSistema
Tipos definidos por el usuario que contienen
matrices
Un tipo definido por el usuario puede contener una
matriz normal (de tamaño fijo). Por ejemplo:
Type SystemInfo
CPU As Variant
Memory As Long
DiskDrives(25) As String ' Matriz de tamaño
fijo.
VideoColors As Integer
Cost As Currency
PurchaseDate As Variant
End Type
También puede contener una matriz
dinámica.
Type SystemInfo
CPU As Variant
Memory As Long
DiskDrives() As String ' Matriz
dinámica.
VideoColors As Integer
Cost As Currency
PurchaseDate As Variant
End Type
Puede tener acceso a los valores de una matriz dentro de
un tipo definido por el usuario de la misma manera en que tiene
acceso a las propiedades de un objeto.
Dim MiSistema As SystemInfo
ReDim MiSistema.DiskDrives(3)
MiSistema.DiskDrives(0) = "1.44 MB"
También puede declarar una matriz de tipos
definidos por el usuario:
Dim TodosSistemas(100) As SystemInfo
Siga las mismas reglas para tener acceso a los
componentes de esta estructura de
datos.
TodosSistemas(5).CPU = "386SX"
TodosSistemas(5).DiskDrives(2) = "SCSI de 100
MB"
Pasar tipos definidos por el usuario a
procedimientos
Puede pasar argumentos de procedimiento mediante un tipo
definido por el usuario.
Sub FillSystem (UnSistema As SystemInfo)
UnSistema.CPU = lstCPU.Text
UnSistema.Memory = txtMemory.Text
UnSistema.Cost = txtCost.Text
UnSistema.PurchaseDate = Now
End Sub
Nota Si desea pasar un tipo definido
por el usuario a un módulo de formulario, el procedimiento
debe ser privado.
Puede devolver tipos definidos por el usuario desde
funciones y puede pasar una variable de un tipo definido por el
usuario a un procedimiento como un argumento. Los tipos definidos
por el usuario siempre se pasan por referencia, de modo que el
procedimiento puede modificar el argumento y devolverlo al
procedimiento que lo ha llamado, como se muestra en el ejemplo
anterior.
Nota Debido a que los tipos definidos
por el usuario siempre se pasan por referencia, todos los datos
contenidos en dichos tipos se pasarán y se
devolverán desde el procedimiento. En el caso de tipos
definidos por el usuario con matrices de gran tamaño, esto
podría originar una reducción de las prestaciones,
especialmente en aplicaciones cliente/servidor,
en las que el procedimiento se puede ejecutar desde un equipo
remoto. En tal caso, es preferible extraer y pasar
únicamente los datos necesarios del tipo definido por el
usuario.
Para obtener más
información Para obtener más
detalles acerca del paso por referencia, vea "Pasar argumentos a
procedimientos" en "Fundamentos de
programación".
Tipos definidos por el usuario que contienen
objetos
Los tipos definidos por el usuario también pueden
contener objetos.
Private Type AccountPack
frmInput as Form
dbPayRollAccount as Database
End Type
Sugerencia Como el tipo de datos
Variant puede almacenar muchos tipos de datos diferentes, puede
usar una matriz Variant en muchas situaciones en las que
usaría un tipo definido por el usuario. De hecho, una
matriz Variant es más flexible que un tipo definido por el
usuario, ya que puede modificar el tipo de los datos almacenados
en cada elemento en cualquier momento y puede convertir la matriz
en dinámica para modificar su tamaño cuando sea
necesario. Sin embargo, una matriz Variant siempre utiliza
más memoria que un tipo definido por el usuario
equivalente.
Anidar estructuras de
datos
El anidamiento de estructuras de datos puede ser tan
complejo como se quiera. De hecho, los tipos definidos por el
usuario pueden contener otros tipos definidos por el usuario,
como se muestra en el ejemplo siguiente. Para hacer que el
código sea más legible y fácil de depurar,
procure escribir en un único módulo todo el
código de los tipos de datos definidos por el
usuario.
Type DriveInfo
Type As String
Size As Long
End Type
Type SystemInfo
CPU As Variant
Memory As Long
DiskDrives(26) As DriveInfo
Cost As Currency
PurchaseDate As Variant
End Type
Dim AllSystems(100) As SystemInfo
AllSystems(1).DiskDrives(0).Type = "Floppy"
UNIDAD II
Sub (Instrucción)
Declara el nombre, los argumentos, y
el código que componen el cuerpo de un procedimiento
Sub.
Sintaxis
[Private | Public | Friend] [Static] Sub nombre
[(lista_argumentos)]
[instrucciones]
[Exit Sub]
[instrucciones]
End Sub
La sintaxis de la instrucción Sub consta de las
siguientes partes:
Para ver el
gráfico seleccione la opción ¨Descargar
trabajo¨ del menú superior
El argumento lista_argumentos consta de las siguientes
partes y sintaxis:
[Optional] [ByVal | ByRef] [ParamArray]
nombre_variable[( )] [As tipo] [=
valor_predeterminado]
Para ver el
gráfico seleccione la opción ¨Descargar
trabajo¨ del menú superior
Comentarios
Si no se especifica explícitamente mediante
Public, Private o Friend, los procedimientos Sub son
públicos de manera predeterminada. Si no se usa Static, el
valor de las variables locales no se mantiene entre distintas
llamadas. La palabra clave Friend solamente se puede usar en
módulos de clase. Sin embargo, los procedimientos en
cualquier módulo de un proyecto pueden acceder a los
procedimientos Friend. Un procedimiento Friend no aparece en
la biblioteca
de tipo de su clase primaria, ni se puede
enlazar posteriormente.
Precaución Los procedimientos
Sub pueden ser recursivos; es decir, se pueden llamar a sí
mismos para realizar una tarea determinada. Sin embargo, esto
puede llevar al desbordamiento de la pila. La palabra clave
Static generalmente no se utiliza con procedimientos recursivos
Sub.
Todo código ejecutable debe estar en
procedimientos.
No puede definir un procedimiento Sub dentro de otro
procedimiento Sub, Function o Property.
Las palabras clave Exit Sub causan la inmediata salida
de un procedimiento Sub. La ejecución del programa
continúa con la instrucción que sigue a la
instrucción que llamó el procedimiento Sub.
Cualquier número de instrucciones Exit Sub puede aparecer
en cualquier lugar de un procedimiento Sub.
Al igual que un procedimiento Function, un procedimiento
Sub es un procedimiento distinto que toma argumentos, lleva a
cabo una serie de instrucciones y cambia el valor de sus
argumentos. Sin embargo, a diferencia de un procedimiento
Function, el cual devuelve un valor, un procedimiento Sub no se
puede utilizar en una expresión.
Para llamar a un procedimiento Sub, use el nombre del
procedimiento seguido de la lista de argumentos. Consulte la
instrucción Call para obtener información
específica acerca de cómo llamar a los
procedimientos Sub.
Las variables usadas en procedimientos Sub se dividen en
dos categorías: las que están explícitamente
declaradas dentro del procedimiento y las que no lo están.
Las variables declaradas explícitamente en un
procedimiento (mediante Dim o un equivalente) siempre son locales
del procedimiento. Otras variables usadas pero no declaradas
explícitamente en un procedimiento también son
locales, a menos que se declaren explícitamente en
algún nivel superior fuera del procedimiento.
Precaución Un procedimiento
puede usar una variable que no esté declarada
explícitamente en el procedimiento, pero puede ocurrir un
conflicto de
nombres si cualquier cosa que ha definido en el nivel de
módulo tiene el mismo nombre. Si el
procedimiento se refiere a una variable no declarada que tiene el
mismo nombre que otro procedimiento, constante o variable, se
supone que el procedimiento se está refiriendo al nombre
de ese nivel de módulo. Para evitar este tipo de conflictos,
declare las variables explícitamente. Puede usar una
instrucción Option Explicit para forzar la
declaración explícita de variables.
Nota No se puede usar GoSub, GoTo o
Return para obtener acceso o salir de un procedimiento
Sub.
Function (Instrucción)
Declara el nombre, los argumentos y
el código que componen el cuerpo de un procedimiento
Function.
Sintaxis
[Public | Private | Friend] [Static] Function nombre
[(lista_argumentos)] [As tipo]
[instrucciones]
[nombre = expresión]
[Exit Function]
[instrucciones]
[nombre = expresión]
End Function
La sintaxis de la instrucción Function consta de
las siguientes partes:
Para ver
el gráfico seleccione la opción ¨Descargar
trabajo¨ del menú superior
El argumento lista_argumentos tiene la siguiente
sintaxis y partes:
[Optional] [ByVal | ByRef] [ParamArray]
nombre_variable[( )] [As tipo] [=
valor_predeterminado]
Para ver el
gráfico seleccione la opción ¨Descargar
trabajo¨ del menú superior
Comentarios
Si no se especifican de forma explícita mediante
Public, Private o Friend, los procedimientos Function son
públicos de manera predeterminada. Si no se emplea Static,
el valor de las variables locales no se conserva entre distintas
llamadas. La palabra clave Friend sólo puede usarse en
módulos de clase. Sin embargo, puede accederse a los
procedimientos Friend por procedimientos en cualquier
módulo de un proyecto. Un procedimiento Friend no aparece
en la biblioteca de
tipos de su clase primaria.
Precaución Los procedimientos
Function pueden ser recursivos; es decir, pueden llamarse a
sí mismos para realizar una tarea determinada. Sin
embargo, la recursión puede provocar el desbordamiento de
pila. La palabra clave Static no se suele utilizar con
procedimientos Function recursivos.
Todo el código ejecutable debe estar dentro de
procedimientos. No puede definir un procedimiento Function dentro
de otro procedimiento Function, Sub o Property.
La instrucción Exit Function produce una salida
inmediata de un procedimiento Function. La ejecución del
programa continúa con la instrucción que sigue a la
instrucción que llamó al procedimiento Function. En
cualquier lugar de un procedimiento Function puede aparecer
cualquier número de instrucciones Exit
Function.
Al igual que un procedimiento Sub, un procedimiento
Function es un procedimiento independiente que puede adoptar
argumentos, realizar una serie de instrucciones y cambiar los
valores de sus argumentos. Sin embargo, a diferencia de un
procedimiento Sub, puede utilizar un procedimiento Function en el
lado derecho de una expresión
de la misma forma en que utiliza cualquier función
intrínseca, como Sqr, Cos o Chr, cuando desea emplear el
valor devuelto por la función.
Para llamar a un procedimiento Function, utilice en una
expresión el nombre de función seguido de la lista
de argumentos entre paréntesis. Consulte la
instrucción Call para obtener información
específica acerca de cómo llamar a los
procedimientos Function.
Para devolver un valor de una función, asigne el
valor al nombre de la función. En cualquier lugar del
procedimiento puede aparecer cualquier número de
asignaciones de este tipo. Si no se asigna ningún valor a
nombre, el procedimiento devolverá un valor
predeterminado: una función numérica devuelve 0,
una función de cadena devuelve una cadena de longitud cero
("") y una función Variant devuelve Empty. Una
función que devuelve una referencia de objeto devuelve
Nothing si no se asigna ninguna referencia de objeto a nombre
(mediante Set) dentro del procedimiento Function.
El ejemplo siguiente muestra cómo asignar un
valor de retorno a una función llamada BinarySearch. En
este caso, False se asigna al nombre para indicar que no se
encontró algún valor.
Function BinarySearch(. . .) As Boolean
. . .
' Valor no encontrado. Devuelve un valor
False.
If lower > upper Then
BinarySearch = False
Exit Function
End If
. . .
End Function
Las variables empleadas en procedimientos Function se
dividen en dos categorías: las que se declaran
explícitamente dentro del procedimiento y las que no. Las
variables que se declaran explícitamente en un
procedimiento (mediante Dim u otra instrucción
equivalente) siempre son locales del procedimiento. Las variables
que se utilizan pero no se declaran explícitamente en un
procedimiento también son locales, a menos que se hayan
declarado explícitamente en algún nivel superior
fuera del procedimiento.
Precaución Un procedimiento
puede utilizar una variable que no se ha declarado
explícitamente en el procedimiento, pero puede ocurrir un
conflicto de nombres si algo que definió en un
nivel de
módulo tiene el mismo nombre. Si su
procedimiento hace referencia a una variable no declarada que
tiene el mismo nombre que otro procedimiento, constante o
variable, se supone que el procedimiento hace referencia a ese
nombre a nivel de módulo. Declare explícitamente
las variables para evitar este tipo de conflicto. Puede utilizar
una instrucción Option Explicit para forzar la
declaración explícita de variables.
Precaución Visual Basic puede
reorganizar las expresiones aritméticas para mejorar su
eficacia
interna. Evite utilizar un procedimiento Function en una
expresión aritmética cuando la función
cambie el valor de las variables de la misma
expresión.
IF … ENDIF (Comando)
Ejecuta condicionalmente un conjunto de comandos
dependiendo del resultado de una expresión lógica.
Sintaxis
IF lExpresión [THEN]
Comandos
[ELSE
Comandos]
ENDIF
Argumentos
lExpresión
Especifica la expresión lógica evaluada.
Si lExpresión da como resultado verdadero (.T.), se
ejecutarán cualesquiera instrucciones posteriores a IF y
anteriores a ELSE o ENDIF (lo que suceda primero).
- Si lExpresión es falsa y se incluye ELSE, se
ejecutan los comandos situados después de ELSE y antes
de ENDIF. - Si lExpresión es falsa (.F.) y no se incluye
ELSE, se pasarán por alto todas las instrucciones entre
IF y ENDIF. En este caso la ejecución del programa
continuará con la primera línea de comando a
continuación de ENDIF.
Comentarios
Puede anidar IF … ENDIF dentro de otro
bloque IF … ENDIF.
Los comentarios precedidos de && se pueden
colocar en la misma línea después de IF, ELSE y
ENDIF. Estos comentarios se pasan por alto durante la
compilación y la ejecución del programa.
If…Then…Else (Instrucción)
Ejecuta condicionalmente un grupo de instrucciones,
dependiendo del valor de una expresión.
Sintaxis
If condición Then [instrucciones]-[Else
instrucciones_else]
Puede utilizar la siguiente sintaxis en formato de
bloque:
If condición Then
[instrucciones]
[ElseIf condición-n Then
[instrucciones_elseif] …
[Else
[instrucciones_else]]
End If
La sintaxis de la instrucción If…Then…Else
consta de tres partes:
Para ver
el gráfico seleccione la opción ¨Descargar
trabajo¨ del menú superior
Comentarios
Puede utilizar la forma de una sola línea
(Sintaxis 1) para pruebas cortas
y sencillas. Sin embargo, el formato de bloque (Sintaxis 2)
proporciona más estructura y
flexibilidad que la forma de línea simple y, generalmente,
es más fácil de leer, de mantener y de
depurar.
Nota Con la sintaxis es posible
ejecutar múltiples instrucciones como resultado de una
decisión If…Then, pero todas deben estar en la misma
línea y separadas por dos puntos, como en la
instrucción siguiente:
If A > 10 Then A = A + 1 : B = B + A : C = C +
B
Una instrucción con formato de bloque If debe ser
la primera de la línea. Las partes Else, ElseIf y End If,
de la instrucción, solamente pueden ir precedidas de
un número de
línea o una etiqueta de
línea. El bloque If debe terminar con una
instrucción End If.
Para determinar si una instrucción If es un
bloque, examine lo que sigue a la palabra
Then. Si lo que aparece detrás de Then en la misma
línea no es un comentario,
la instrucción se considera como una instrucción If
de una sola línea.
Las cláusulas Else y ElseIf son opcionales. Puede
tener en un bloque ElseIf, tantas cláusulas If como desee,
pero ninguna puede aparecer después de una cláusula
Else. Las instrucciones de bloque If se pueden anidar; es decir,
unas pueden contener a otras.
Cuando se ejecuta un bloque If (Sintaxis 2), se prueba
condición. Si condición es True, se ejecutan las
instrucciones que están a continuación de Then. Si
condición es False, se evalúan una a una las
condiciones ElseIf (si existen). Cuando se encuentra una
condición True se ejecutan las instrucciones que siguen
inmediatamente a la instrucción Then asociada. Si ninguna
de las condiciones ElseIf es True (o si no hay cláusulas
ElseIf), se ejecutan las instrucciones que siguen a Else.
Después de la ejecución de las instrucciones que
siguen a Then o Else, la ejecución continúa con la
instrucción que sigue a End If.
Sugerencia Select Case puede ser
más útil cuando se evalúa una única
expresión que tiene varias acciones
posibles. Sin embargo, la cláusula TypeOf nombre_objeto Is
tipo_objeto no se puede utilizar en una instrucción Select
Case.
Nota No se puede usar TypeOf con tipos
de datos predefinidos como Long, Integer y así
sucesivamente, excepto en el tipo de datos Object.
Select Case (Instrucción)
Ejecuta uno de varios grupos de
instrucciones,
dependiendo del valor de una expresión.
Sintaxis
Select Case expresión_prueba
[Case lista_expresion-n
[instrucciones-n]] …
[Case Else
[instrucciones_else]]
End Select
La sintaxis de la instrucción Select Case consta
de las siguientes partes:
Para
ver el gráfico seleccione la opción ¨Descargar
trabajo¨ del menú superior
Comentarios
Si expresión_prueba coincide con cualquier
lista_expresión asociada con una cláusula Case, las
instrucciones que siguen a esa cláusula Case se ejecutan
hasta la siguiente cláusula Case o, para la última
cláusula, hasta la instrucción End Select. El
control pasa después a la instrucción que sigue a
End Select. Si expresión_prueba coincide con una
expresión de lista_expresión en más de una
cláusula Case, sólo se ejecutan las instrucciones
que siguen a la primera coincidencia.
La cláusula Case Else se utiliza para indicar las
instrucciones que se van a ejecutar si no se encuentran
coincidencias entre expresión_prueba y una
lista_expresión en cualquiera de las otras selecciones de
Case. Aunque no es necesario, es buena idea tener una
instrucción Case Else en el bloque Select Case para
controlar valores imprevistos de expresión_prueba. Cuando
no hay una instrucción Case Else y ninguna
expresión de la lista en las cláusulas Case
coincide con la expresión de prueba, la ejecución
continúa en la instrucción que sigue a End
Select.
Se pueden utilizar expresiones múltiples o
intervalos en cada cláusula Case. Por ejemplo, la
línea siguiente es válida:
Case 1 To 4, 7 To 9, 11, 13, Is >
MaxNumber
Nota El operador de comparación
Is no es lo mismo que la palabra clave Is utilizada en la
instrucción Select Case.
También puede especificar intervalos y
expresiones múltiples para cadenas de caracteres. En el
siguiente ejemplo, Case coincide con las cadenas que son
exactamente iguales a todo, cadenas que están entre nueces
y sopa en orden alfabético y el valor actual de
ElemPrueba:
Case "iguales a todo", "nueces" To "sopa",
ElemPrueba
Las instrucciones Select Case se pueden anidar. Cada
instrucción Select Case debe tener su correspondiente
instrucción End Select.
Unidad III
