|
4. Manos a la obra
Para empezar ejecutemos el programa Visual Basic
y cuando le aparezca la ventana "NUEVO PROYECTO"
igual a la figura n.2, seleccionen el icono "Control
Activex", y le dan Doble Click.
Ahora vemos una pantalla gris parecida a un formulario,
con la diferencia que no tiene ni marco, ni los
botones de minimizar, maximizar, y cerrar, esto
es por que un control no es un Formulario. Ahora,
como vamos a diseñar un control TEXTBOX_ESPECIAL;
en la ventana propiedades donde dice UserControl1
(Propiedad "NAME"), borre eso y coloque
TEXTBOX_ESPECIAL, luego añadimos un TEXBOX
común y silvestre en el fondo gris no importa
donde, ni el tamaño, ya que eso lo arreglaremos
a nivel de código, pueden notar que en
la ventana controles aparece una figura desactivada
como la que se muestra en la figura N.3:
Esta figura es nuestro control, pero como no
hay ningún formulario para añadirlo
no se activa. Ahora vamos a añadir un formulario
a nuestro proyecto, denle click al segundo botón
de la barra de herramienta de Visual Basic la
cual al posicionar el mouse en él le indicara
que es para añadir un nuevo formulario,
cuando le aparezca la ventana de "Añadir
un Formulario", seleccione el formulario
Normal y le dan al botón Aceptar.
Repasemos, debemos de tener un proyecto con un
control llamado TEXTBOX_ESPECIAL y un formulario
llamado Form1.
Continuemos, ahora vamos a ver nuestro control
en el formulario, para habilitar el control en
la ventana de controles, dele doble-click al control
TEXTBOX_ESPECIAL en la ventana Proyecto, verán
el control con un textbox normal, ahora cierre
la ventana dándole click al botón
cerrar ("X") el cual se encuentra al
lado derecho del menú, verán que
se cierra el control y se ve el formulario y se
habilita el control en la barra de controles,
ahora sigua estos pasos:
1. Dele doble click a nuestro control, al darle
verán a nuestro control pero, de una manera
un poco desordenado ya que el control tiene un
marco mas grande que el TEXTBOX, anda intenta
mover el control para que veas que feo se ve!!!!.
Ahora es aquí donde vamos a CODIFICAR
NUESTRO CONTROL, denle doble-click al control
TEXTBOX-ESPECIAL en la ventana "PROYECTO",
cuando vean el control le dan doble-click en él
para meternos en el código y ahora siga
con estos pasos:
1. Colóquese en el evento RESIZE de USERCONTROL,
y escriba este código:
Private Sub UserControl_Resize()
Text1.Top = 0
Text1.Left = 0
Text1.Height = Height
Text1.Width = Width
End Sub
2. En la ventana de propiedades de USERCONTROL
coloque HEIGHT = 385 y WIDTH = 1590.
Con esto lo que estamos haciendo es adaptando
al TEXTBOX de nuestro control al tamaño
que el control presenta, ahora cierre otra vez
la ventana de diseño del control, y cuando
vea habilitado el control en la ventanas de controles,
seleccione el formulario borre el control antiguo
que inserto y vuélvale a dar doble-click
a nuestro control notara que ahora tiene una presentación
mas aceptable e intente de aumentar y disminuir
su tamaño para que vea como el control
TEXTBOX se adapta a nuestra exigencia. Y notara
que si ve las propiedades de nuestro control no
aparece ni el BACKCOLOR, FONT, PASSSORDCHAR, entre
muchos otros, y que en los eventos no aparece
ni KEYPRESS, MOUSEDOWN, etc, esto se debe a que
todo eso hay que codificarlos nosotros mismos,
pero no se preocupen eso es mas fácil de
lo que ustedes se imaginan.
>> Ver
siguiente capitulo
|
Microsoft explorer 6.0 
