GRADO DÉCIMO PERÍODO DOS DOCUMENTO DE APOYO PARA COMPROMISOS

GRADO DÉCIMO - PERÍODO DOS

DOCUMENTO DE APOYO

PROGRAMA ESPEJITO

PROPUESTA DE INTERFAZ GRÁFICA DE USUARIO (GUI)

Como vimos en clase, en esta aplicación manejaremos dos formularios. En el primero básicamente capturamos el nombre de la niña.

En este formulario se manejan: una Label (lblEspejito) en el cual le mostramos el aviso inicial al usuario. Una caja de texto (txtEspejito) en la cual se escribe el nombre. Un botón (btnEspejito) para invocar el segundo formulario y controlar que la caja de texto no esté vacía.

 En el segundo formulario le presentamos el nombre en otro formato de fuente, acompañado de una imagen.

Las herramientas usadas en este formulario son dos: una Label (lblNombreBonito) para mostrar el nombre de la usuaria, para el ejemplo Juanita. Un PictureBox (picImagen) en la cual mostramos un dibujo o imagen.

PROPUESTA DE CÓDIGO FUENTE

El código fuente se debe desarrollar cuando en el primer formulario la usuaria de clic sobre él. Por lo tanto en tiempo de diseño, damos doble clic sobre el botón y escribimos lo siguiente:

Public Class frmEspejito

    Private Sub btnEspejito_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnEspejito.Click

        If txtEspejito.Text = "" Then

            MsgBox("Por favor regálame tu nombre", MsgBoxStyle.Critical, "ESPEJITO")

        Else

            MsgBox("¿Quién es la niña más linda del reino Sumapaz?", MsgBoxStyle.Exclamation, "ESPEJITO")

            frmEspejitoBonito.Show()

            frmEspejitoBonito.lblNombreBonito.Text = Me.txtEspejito.Text

        End If

        

    End Sub

End Class

Si se cambiaron los nombres de las herramientas utilizadas por los sugeridos, al dar doble clic sobre el botón, se nos ofrece una interfaz similar a un procesador de texto, y en donde aparece el cursor se digita el código fuente anterior. La primera y segunda líneas no deben escribirse; tampoco las dos últimas, pues Visual Basic las suministra. Me permití resaltar con amarillo las sentencias que deben escribirse.

PROGRAMA PALETA DE COLORES

Manejaremos sólo un formulario, en el cual el usuario visualiza una serie de colores los que frente a ellos tienen un espacio para escribir el nombre correspondiente. El número de colores debe ser mínimo de diez.

PROPUESTA DE INTERFAZ GRÁFICA DE USUARIO G.U.I.

Las herramientas utilizadas son: Una Label (lblAviso) para el mensaje inicial de orientación al usuario. Cada color manejará dos (2) TextBox (cajas de texto), una para mostrar el color y otra para que el usuario escriba el nombre. La primera se llamará por ejemplo txtColorAmarillo, la propiedad BackColor se cambiará a amarillo y la Enable a False, para inhabilitar la posibilidad de escribir sobre ella. La segunda caja de texto por ejemplo se llamará (propiedad Name) txtNombreAmarillo. Ustedes deben adicionar los demás colores. Se maneja también un botón (btnEvaluacion) el cual desencadena el proceso de evaluación de lo escrito por el usuario, la propiedad Text se cambiará por la palabra Evaluación... Otra herramienta utilizada es una Label (lblAciertos), en la cual se mostrará el número de puntos obtenidos. La propiedad Text de dicho objeto se dejará vacía.

PROPUESTAS DE CÓDIGO FUENTE

El código fuente se activará cuando el usuario de clic sobre el botón. Para esto, en tiempo de diseño, damos doble clic sobre él y escribimos lo siguiente. 

Public Class frmColores

    Dim varAciertos As Integer

    Private Sub btnEvaluacion_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnEvaluacion.Click

        varAciertos = 0

        If txtNombreAmarillo.Text = "AMARILLO" Then

            varAciertos = varAciertos + 1

        Else

            txtNombreAmarillo.Text = ""

        End If

        If txtNombreRojo.Text = "ROJO" Then

            varAciertos = varAciertos + 1

        Else

            txtNombreRojo.Text = ""

        End If

        lblAciertos.Text = "Puntos" & " " & varAciertos

    End Sub

End Class

Nuevamente, resalté en verde (¿o azul?), las sentencias que se deben escribir. Observe que hay una línea antes del evento clic del botón btnEvaluación. Si el usuario no escribe el nombre del color en las condiciones que le exigimos (MAYÚSCULA sostenida), el programa le borra lo que haya digitado. La última sentencia, escrita por nosotros, permite "cargar" en la Label lblAciertos el resultado obtenido.

Cualquier duda por favor me comentan. Los espero en la sala para que soluciones inconvenientes.