GRADO DÉCIMO
PROYECTO EN VISUAL BASIC: ESPEJITO
OBJETIVO: Crear una aplicación que
capture el nombre de una niña y lo muestre en otro formato de texto.
ANÁLISIS: Recordando el conocido
cuento infantil Blanca Nieves, presentaremos una primera interfaz en la cual se
captura el nombre de la niña. Posteriormente se lo presentaremos en un formato
de texto, tamaño, colores, y fuente diferente. El programa debe controlar que
no se deje vacío el elemento en el cual se escribe el nombre, indicando que
debe escribirse. Cuando se haga dicha acción preguntará: ¿Quién es la niña más
hermosa del reino Sumapaz? Y posteriormente lo exhibirá en el nuevo formato,
acompañado de una imagen llamativa.
Veamos esto en gráficas:
Si no se escribe un nombre en la caja de texto el
programa controla esta situación y regresa al usuario a la primera ventana.
Veámoslo en gráficas:
DISEÑO DE LA
GUI
Se van a manejar dos ventanas. La primera captura el
nombre y la segunda la muestra en otro formato de texto (más llamativo).
La figura nos muestra el primer formulario y los
elementos dentro de él, con las propiedades que se deben cambiar y los valores asignados.
Recordemos que los nombres de estos elementos en la
caja de herramientas de Visual Basic que
necesitamos en esta ventana son: Formulario = Form, Etiqueta = Label,
Caja de Texto = TextBox y Botón = Button.
Cuando se haya terminado el diseño de la anterior
ventana debemos crear el segundo formulario. Para hacemos lo siguiente:
Vamos al Menú Ver y escogemos la opción Explorador
de Soluciones, como se ve en la siguiente gráfica.
En la siguiente ventana escogemos la opción Windows
Form, y cambiamos el nombre que por defecto le ha colocado Visual Basic
(posiblemente Form1, si ya se cambió el nombre del primer formulario).
Debemos tener cuidado de no borrar la extensión del nombre .vb El nuevo nombre puede ser frmMostrar.
Y se oprime el botón Agregar. Ahora tenemos
dos formularios en el proyecto, como lo vemos en la imagen.
Segunda Ventana
Ventana (*)àEscoger Recurso Local y pulsar el botón Importar.
Buscar en el Disco Duro la imagen deseada en la ventana que emerge a
continuación y que aparece a la derecha en la image. Oprimir el botón Abrir
de la ventana de navegación y el botón Aceptar de la ventana (*), luego de esto queda la imagen incorporada al PictureBox.
Ventana (**)à Escoger las opciones: Fuente,
Estilo y Tamaño.
Hecho
todo lo anterior, podemos escribir ahora el Código Fuente. Para esto
debemos pensar en lo siguiente:
Cuando la persona pulsa el botón Seguir de la
primera ventana se desencadenan acciones, es por esto que debemos programar el evento clic de
dicho elemento (botón). Entonces en tiempo de diseño damos doble
clic sobre el botón y se nos presenta una interfaz en la cual podemos
escribir las órdenes que queremos que se cumplan cuando se dé clic sobre el
botón en tiempo de diseño. Vemos que en esa interfaz Visual Basic nos “regala”
cuatro líneas de código.
Acá escribimos lo siguiente:
Explicación del código fuente:
Lo
cual es una estructura de decisión que podemos ver así:
Pseudocódigo Explicación
Si condición Entonces à Si se cumple la condición Entonces
Acción 1 à Se efectúa
la acción 1
Sino à Si no se cumple la condición
Acción Dos à Se
efectúa la acción 2
Fin del Si à Fin de la estructura
Análisis del código:
1.
If txtNombre.Text = "" Then
2. MsgBox("Por favor escriba su nombre",
MsgBoxStyle.Critical, "Espejito")
3. Else
4. MsgBox("¿Quién es la niña más linda del reino
Sumapaz?", MsgBoxStyle.Information, "Espejito")
5. frmMostrar.Show()
6.
End If
Línea 1. Evaluamos à Si la condición se dejó la caja de texto vacía entonces
Línea 2. Mostramos una caja de mensaje como se ve en la figura
Compare la ventana que se produce con la sentencia de la línea 2.
Línea
3. Sino
Línea
4. Mostramos otra caja de mensaje como se ve en
la figura
Compare
la ventana que se produce con la sentencia de la línea 4.
Línea 5. Se invoca el formulario frmMostrar en el
que va a aparecer el nombre de la niña en un nuevo formato.
Línea 6. Se cierra la estructura IF THEN ELSE END IF
Ahora vamos a aprovechar el tiempo que hay entre el momento en que se da clic sobre el botón Aceptar de esta última ventana y el momento en que aparece la segunda ventana. Este evento es llamado LOAD del segundo formulario. Para esto sobre el formulario Mostrar y en un espacio libre le damos doble clic, con lo cual nos aparece lo siguiente:
En donde se ubique el cursor escribimos: Me.lblNombreBonito.Text = frmEspejito.txtNombre.Text
Si hemos respetado los nombres asignados a las
herramientas o elementos utilizados y escrito el código fuente en los eventos
indicados, nuestro programa debe funcionar, conforme lo indicamos en las dos primeras figuras de este documento.
