viernes, 22 de agosto de 2008

Objetos

Es posible crear y trabajar con varios tipo de objetos como: controls, forms, menus y objetos genericos en Visual Basic Integrated Development Environment (IDE), por ejemplo:

   Dim frmMiForma As Form
Dim txtMiCajaTexto As TextBox
Dim lblMiEtiqueta As Label
Dim ctlGenerico As Control

Para asociar una variable tipo objeto con un control particular se utiliza la sentencia Set:

Set txtMiCajaTexto = frmAltaEmpleados.txtNombre

Una vez realizada la asignación, es posible utilizar la variable como un Alias para el nombre del control.

txtMiCajaTexto.Text = "Hello World!"

También es posible utilizar una variable tipo objeto generico, la cual puede asumir el valor de cualquier tipo de objeto:

   Dim oGenerico As Object
Set oGenerico = txtNombre
oGenerico.Text = "Rebeca"
Set oGenerico = New frmAltaEmpleado 'el objeto es una nueva instancia de una forma
oGenerico.Show
oGenerico.Nothing 'Se destruye el objeto

Suponga que tiene varios controles del mismo tipo y dada cierta acción es necesario establecer ciertas propiedades de estos controles, hacerlo control a control puede ser una tarea poco eficiente pensando en que es posible automatizarla, por lo que Visual Basic permite trabajar con arreglos de objetos, para ello primero declare un arreglo del tipo que sean sus controles:

Dim aBotones(5) As CommandButton

Después inicialice el arreglo:

   Set aBotones(1) = cmdAlta
Set aBotones(2) = cmdBaja
Set aBotones(3) = cmdCambio
Set aBotones(4) = cmdConsulta
Set aBotones(5) = cmdSalir

Por último automatice el estado de sus controles:

   Dim i As Integer
For i = 1 To 5
aBotones(i).Enabled = False
Next

0 comentarios: