Visual Basic 6 – Capítulo 08 – Formularios y controles

Los formularios en Visual Basic 6 son ventanas de la interfaz de usuario que permiten a los usuarios interactuar con una aplicación. Los formularios pueden contener diversos controles, como botones, cuadros de texto, etiquetas y más, que facilitan la entrada de datos y la ejecución de acciones. A continuación, se presentan conceptos básicos para comenzar a trabajar con formularios en Visual Basic 6.

2. Diseño y Personalización de Formularios

Para diseñar y personalizar formularios en Visual Basic 6, sigue estos pasos:

1. Abre Visual Basic 6 y crea un nuevo proyecto.
2. En el menú «Proyecto», selecciona «Agregar Formulario» para crear un nuevo formulario.
3. Utiliza la barra de herramientas de diseño para agregar y posicionar controles en el formulario.
4. Ajusta las propiedades de los controles, como texto, tamaño, fuente y color.
5. Personaliza el formulario ajustando propiedades como título, tamaño, color de fondo y estilo.

3. Uso de Controles en Formularios

En Visual Basic 6, los controles son elementos interactivos que permiten a los usuarios interactuar con la aplicación. Algunos controles comunes son:

• Etiqueta (Label): Muestra texto estático en el formulario para proporcionar información o instrucciones.
• Cuadro de Texto (Text Box): Permite al usuario ingresar texto, números u otros datos.
• Botón (Command Button): Ejecuta una acción cuando el usuario hace clic en él.
• Casilla de Verificación (Check Box): Permite al usuario seleccionar una o varias opciones.
• Botón de Opción (Option Button): Permite al usuario elegir una opción de entre varias.
• Lista Desplegable (Combo Box): Muestra una lista desplegable de opciones para seleccionar.
• Cuadro de Lista (List Box): Muestra una lista de opciones para seleccionar.

4. Gestión de Eventos y Procedimientos

Los eventos son acciones que ocurren en los controles, como hacer clic en un botón o cambiar el contenido de un cuadro de texto. Los procedimientos son bloques de código que se ejecutan en respuesta a un evento. Aquí hay algunos eventos comunes y cómo manejarlos:

Private Sub CommandButton1_Click()
    ' Código a ejecutar cuando se hace clic en el botón.
End Sub

Private Sub TextBox1_Change()
    ' Código a ejecutar cuando el contenido del cuadro de texto cambia.
End Sub

5. Ejercicios Resueltos

Ejercicio 1: Calculadora Básica

Crea un formulario que simule una calculadora básica. Debe contener botones numéricos, operadores (+, -, *, /), un cuadro de texto para mostrar la entrada y el resultado, y un botón para borrar.

Private Sub CommandButton_Click()
    TextBox1.Text = TextBox1.Text & CommandButton.Caption
End Sub

Private Sub CommandButtonClear_Click()
    TextBox1.Text = ""
End Sub

Private Sub CommandButtonEquals_Click()
    On Error Resume Next
    TextBox1.Text = Evaluate(TextBox1.Text)
End Sub

Ejercicio 2: Convertidor de Temperatura

Crea un formulario que permita al usuario convertir temperaturas entre Celsius y Fahrenheit. Utiliza dos cuadros de texto para la entrada y el resultado, y botones para realizar las conversiones.

Private Sub CommandButtonToFahrenheit_Click()
    Dim celsius As Double
    celsius = CDbl(TextBoxCelsius.Text)
    TextBoxFahrenheit.Text = (celsius * 9 / 5) + 32
End Sub

Private Sub CommandButtonToCelsius_Click()
    Dim fahrenheit As Double
    fahrenheit = CDbl(TextBoxFahrenheit.Text)
    TextBoxCelsius.Text = (fahrenheit - 32) * 5 / 9
End Sub

Ejercicio 3: Lista de Colores

1. Agrega un cuadro de lista al formulario.
2. Ajusta las propiedades del cuadro de lista para que muestre una lista de colores (por ejemplo, Rojo, Azul, Verde, Amarillo).
3. Crea un procedimiento asociado al evento Change del cuadro de lista que cambie el color de fondo del formulario según el color seleccionado.

Private Sub ListBox1_Change()
    Select Case ListBox1.ListIndex
        Case 0
            Me.BackColor = RGB(255, 0, 0) ' Rojo
        Case 1
            Me.BackColor = RGB(0, 0, 255) ' Azul
        Case 2
            Me.BackColor = RGB(0, 255, 0) ' Verde
        Case 3
            Me.BackColor = RGB(255, 255, 0) ' Amarillo
    End Select
End

En este capítulo hemos visto una base sólida para trabajar con formularios en Visual Basic 6. A medida que explores más, podrás crear aplicaciones más complejas.