Visual Basic

Práctica Sencilla de Visual Basic
septiembre 24, 2009
Hola, ahora voy a presentar una practica de las mas sencillas para Visual Basic 6.0.
¿En qué consiste? La verdad es algo muy sencillo, es un programa que solicita al usuario un número del 1 al 7 y que será interpretado como un dia de la semana.
Aclaro que el usuario tendra chance oportunidad de elegir si la semana empieza el lunes o eldomingo. Aquí está el video
Bueno lo primero que vamos a hacer es meternos a Visual Basic y como casisiempre pedimos un EXE Estándar.
En el formulario ponemos los siguientes controles:
* 1 Textbox, le cambiamos la propiedad Maxlenght a 1 para que solo puedan escribir 1 numero; tambien puedes cambiarle el color de fondo la fuente etc. a como más te guste.
* 1 Label con la propiedad Caption“Escriba el número de día de la semana”
* 1 Frame con la propiedad Caption “Semana comienza el”
* 1 Optionbutton llamado domingo y la propiedad Caption Domingo”
* 1 optionbuton llamado lunes y la propiedad Caption “Lunes”
* 1 commandButon con la propiedad Caption “Ver dia de la semana”
*  label (label2) con la propiedad Caption vacia.
El proyecto hasta ahora se debe de ver asi:Ahora vamos a ver los elementos que usa el proyecto:
El proyecto usa un arreglo donde contiene los días de la semana; un arreglo es una variable de memoria que en lugar de contener un valor contiene elementos, los cuales contienen valores.
Para entender lo anterior imagina una tabla, la tabla seria el arreglo, las celdas los elementos, y lo que está en las celdas serian los valores de loselementos.
Elemento 0 del arreglo | Elemento 1 del arreglo | Elemento 2 del arreglo | Elemento 3 del arreglo |
Como puedes observar los elementos comienzan a partir del 0, en el ejemplo, el arreglo tiene 4 elementos (que van del 0 al 3). Para referirnos al valor de cada uno de los elementos lo hacemos de la siguiente forma: (miArreglo es el nombre del arreglo).
miArreglo(x)
DondeX es el numero de elemento al que nos vamos a referir. Por ejemplo:
foo=miArreglo(2)
En este caso la variable foo seria igual a “elemento 2 del arreglo”, ya que ese es el valor que está en dicho elemento.
Para asignar un nuevo valor al arreglo, asemos la asignacion al reves. Ejemplo
* miArreglo(0)=”Texto de ejemplo 1″
* miArreglo(1)=”Prueba”
* miArreglo(2)=”Maspruebas”
* miArreglo(3)=”Fin de la prueba”)
Con lo cual la tabla quedaria:
Texto de ejemplo 1 | Prueba | Mas Pruebas | Fin de la prueba |
Para declarar el arreglo, Visual Basic como es costumbre tiene varias formas de declararlo, voy a mostrar solo la que usa el proyecto.
Dim diaSem (1 to 7) as String
Notar que se declara igual que una variable excepto por que se le añadio (1to 7), con lo cual estoy indicando que diaSem será un arreglo y no una variable, y ademas estoy indicando que sus elementos van a ir del 1 al 7. Por lo tanto si posteriormente intento algo como: diaSem(0)=”foo” obtendremos un error.
Una ultima nota acerca de los arreglos, hay arreglos unidimensionales (“tabla” de una fila, como la de nuestro ejemplo) y arreglos multidimensionales (“tabla” devarias filas), pero eso no es asunto que nos interese ahora.
Nuestro pequeño proyecto tambien usa los controles optionbuton, que sirven para elegir una sola opcion de entre un grupo de opciones (el grupo de opciones de “organiza” poniéndolo dentro de un control frame).
Las propiedades mas importantes del optionbutton son Caption, que ya todos sabemos para que sirve y la propiedad value que devuelveverdadero si el optionbutton está seleccionado. (Ver figura):

Para ver con código si un optionbuton está seleccionado o no, pues como es de esperarse lo hacemos con un IF
If optionbutton.value Then
bla bla bla
else
bla bla bla
End If
Código de la aplicacion.
Declaraciones: Vamos a usar una variable...