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