lunes, 14 de octubre de 2013

 
 PROYECTO VISUAL BASIC


Para iniciar Visual Basic 6.0, que es la versión utilizada en estos ejemplos, pulsa sobre el botón Inicio/Programas/Microsoft Visual Basic 6.0 y haz click sobre el icono del programa.

Descripción: inicio1.gif (3231 bytes)
Para iniciar Visual Basic 6.0, que es la versión utilizada en estos ejemplos, pulsa sobre el botón Inicio/Programas/Microsoft Visual Basic 6.0 y haz click sobre el icono del programa.
Descripción: inicio2.gif (31206 bytes)
En la ventana de Nuevo proyecto que aparece, elige el icono EXE estándard, para crear un programa típico.
Esta opción muestra los elementos necesarios para un programa Windows: Una ventana que contiene un Form (formulario) donde puedes insertar los componentes que aparecen habitualmente en los programas para Windows (botones, cajas de texto,etc).
Para diseñar tu primer programa de Visual Basic haz clic con el botón izquierdo del ratón en el icono de la barra de herramientas que muestra una A mayúscula y a continuación arrastra el ratón sobre el formulario: verás aparecer un rectángulo que contiene un texto (Label1).

 

Descripción: http://miajas.com/Informatica/ApuntesBach/edad1.gif
Este componente se denomina Label (etiqueta) y sirve para introducir textos de cualquier tamaño y color en el formulario.
El componente que hay a la derecha de Label se llama Textbox y permite introducir texto por teclado cuando el programa está funcionando.
Inserta tres etiquetas más y dos textbox en el formulario como ves en la imagen de la izquierda.
Al insertar un componente, el contenido que muestran es el nombre del componente (Label1, Label2, Text1,etc) pero puedes cambiarlos (o borrarlos) seleccionándolos con un click de ratón y modificando el texto en la ventana Propiedades que hay a la derecha.
El contenido se modifica cambiando el recuadro Caption del control Label y el campo Text del control TextBox. También es posible cambiar el nombre al control( modificando la propiedad Nombre del mismo), pero en este ejemplo usaremos el nombre propuesto por Visual Basic.
Modifica la etiqueta Label4 para que muestre el texto: naciste en.. y deja tal como está la etiqueta Label3. En esta aparecerá el resultado obtenido por el programa (el año de nacimiento).
Hasta aquí hemos realizado la parte de diseño visual del programa ( que aún puedes mejorar cambiando el tipo de letra, color etc). Ahora necesitamos que el programa haga algo, esto corresponde a la parte del código.
Descripción: http://miajas.com/Informatica/ApuntesBach/edad2.gif
Control para editar texto
Descripción: http://miajas.com/Informatica/ApuntesBach/edad4.gif
Descripción: http://miajas.com/Informatica/ApuntesBach/edad3.gif
Para abrir la ventana de código,asegúrate de seleccionar el control Text2 con un click y  haz doble click sobre él. A continuación selecciona el evento (acción) a ejecutar sobre este control= KeyPress (es decir, al escribir sobre el control) Visual Basic escribe el comienzo y el final de la subrutina que se ejecutará cuando se escriba dentro del Textbox :
Private Sub Text2_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then Label3.Caption = 2000 - Text2
End Sub
el código de programa que hay dentro de la subrutina debes escribirlo tú.
Su significado es: Si el código de la tecla pulsada es 13 (equivale a Intro) entonces escribe en la etiqueta Label3 el resultado de restar a 2000 el contenido del control Text2. Es decir que al pulsar Intro, aparece en el control Label3 el año de nacimiento.
Descripción: http://miajas.com/Informatica/ApuntesBach/edad6.gif
 
Ejecuta el programa pulsando sobre este icono y escribe tu nombre y edad.
Al pulsar Intro debe aparecer tu año de nacimiento.
Descripción: http://miajas.com/Informatica/ApuntesBach/edad5.gif
Observa que Visual Basic realiza conversiones de tipo automáticamente. Es decir que, aunque el contenido de los controles Label y Textbox son alfanuméricos(textos), las operaciones con números se realizan convirtiendo previamente los "textos" numéricos contenidos en esos controles. Otra forma de obtener el mismo resultado sería introducir un control CommandButton (botón) y asignarle (con un doble click) el siguiente código:
Private Sub Command1_Click()
Label3.Caption = 2000 - Text2
End Sub
Descripción: http://miajas.com/Informatica/ApuntesBach/edad7.gif
A un botón de comando puedes añadirle un icono (imagen bmp) pequeño para mostrar mejor la función que realiza.
Para añadir esta imagen, selecciona el control y haz clic sobre los ... (puntos suspensivos) del campo Picture en la ventana Propiedades.
Busca una imagen bmp y selecciónala. Para que el control la muestre debes activar tambien en el campo Style la opción Graphical.
Descripción: edad9.gif (15001 bytes)