PRÁCTICA 1- Colores y Posiciones

Programa de Colores y Posiciones

Este programa permite mover una caja de texto por la pantalla permitiendo a su vez representarla con cuatro colores diferentes. Los archivos de este proyecto se llamarán: Colores0.vbp y Colores0.frm.


Nota: Los objetos deben llevar nombres con un prefijo coherente que facilite la identificación del tipo de objeto.

1.- Iniciar Visual Basic 6.0.

2.- Crear un Proyecto Nuevo (EXE Estándar).

3.- Seleccionar la ventana del Formulario (Form1), haciendo click sobre el y modificar las siguientes propiedades:

Name: frmColores0 . (El prefijo frm permite al programador identificar que el objeto es un formulario).

Caption: Colores

4.- En la ventana de formulario colocar los siguientes controles modificando las propiedades respectivas que se indican a continuación:


A continuación el código correspondiente a los procedimientos de esta programa:

Option Explicit

Private Sub Form_Load()
      txtCaja.Top = 0
End Sub

Private Sub optAbajo_Click()
      txtCaja.Top = frmColores0.ScaleHeight - txtCaja.Height
End Sub

Private Sub optAmarillo_Click()
      txtCaja.BackColor = vbYellow
End Sub

Private Sub optArriba_Click()
      txtCaja.Top = 0
End Sub

Private Sub optAzul_Click()
      txtCaja.BackColor = vbBlue
End Sub

Private Sub optRojo_Click()
      txtCaja.BackColor = vbRed
End Sub

Private Sub optVerde_Click()
      txtCaja.BackColor = vbGreen
End Sub

Observaciones:

- El comando Option Explicit obliga a declarar todas las variables que se utilicen, es conveniente acostumbrase a incluir esta opción.

- Cada una de las partes de código que empieza con un Private Sub y termina con un End Sub es un procedimiento, esto es una parte de código indispensable y reutilizable.

- Los colores se podrían también introducir con notación hexadecimal (comenzando con &H, seguidos por dos dígitos entre 00 y FF (es decir entre 0 y 255 en base 10) para los tres colores fundamentales: Red, Green y Blue (RGB).

- Es importante crear primero el control Frame y después, estando seleccionado, colocar los botones de opción en su interior. No sirve hacerlo a la inversa. Visual Basic supone que todos los botones de opción que están dentro del mismo Frame forman parte del mismo grupo y sólo permite que uno este seleccionado