Programacion en visual basic

Solo disponible en BuenasTareas
  • Páginas : 3 (561 palabras )
  • Descarga(s) : 0
  • Publicado : 6 de septiembre de 2010
Leer documento completo
Vista previa del texto
TRABAJO ESCRITO DE LA EVALUACIÓN 4
Objetivo: Programar en Visual Basic una aplicación que permita cambiar el fondo de un letrero si así se requiere o las letras del mismo.
a) Metodología ilustradacon figuras

1.- Lo primero que hice para realizar este programa fue ponerle nombre con la propiedad caption para el nombre, después agregué una etiqueta con el nombre de cadena y que mostrara elletrero Análisis Numérico y le cambie el tipo de fuente con la propiedad Font como se muestra a continuación.




2.- Después puse tres cuadros de texto y tresHScrollBar, a los cuadros de texto se les borró la información que contenían en la propiedad text y se les puso un cero en el nombre se les dejó por text1. A las HScrollBar, a éstas se les cambiaron losvalores máximos y mínimos que fueron de 255 a 0, respectivamente y las propiedades smallchange y largechange les puse valores de 1 a 16. Por último se agregaron 3 etiquetas con los nombres de los colores acombinar para la propiedad caption mientras que para el name se les puso color, se les cambio el fondo para hacer mas alusión a su nombre, con la propiedad backcolor.



3.- A continuación puseun command button para la opción de salir. Se puso un frame con el nombre de colores y dentro del frame dos optionbutton con el nombre de fondo y texto, esto es para que el usuario escoga que opciónes la que quiere cambiar si el fondo o el texto.



4.- A continuación se muestra el código correspondiente para que la aplicación se pueda correr, con su correspondiente explicación.

PrivateSub Command1_Click()
Unload Me
End Sub

Esto fue dentro del commandbutton para que al presionarlo el programa finalizara.

Private Sub Form_Load()
Cadena.BackColor = RGB(rojo, verde, azul)Cadena.ForeColor = RGB(rojo, verde, azul)
End Sub

Esto fue para que el fondo y las letras cambiaran de color de acuerdo a la combinación red green blue.

Private Sub HScroll1_Change(Index As...
tracking img