mi padre y yo

mi padre y yo
¡¡¡¡igualitos!!!!

Buscar este blog

viernes, 25 de junio de 2010


ESTE PROGRAMA FUE CRADO A TRAVES DEL VISUAL BASIC, EN ESTE PROGRAMA CREE LA FUNCION DOCOLOR QUE LE DARA COLOR A LA BARRA EN BLANCO (QUE AHORA E SAMARILLA DEBIDO A LA COMBINACION ENTRE EL ROJO Y EL VERDE)
PARA ESTE PROGRAMA SE CREARON LOS SIGUIENTES CONTROLES:
1 COMMANDBUTTON
3 LABEL
3 SCROLL BAR
las opciones o codigos que se introducen en los controles creados son los siguientes:


Private Sub Command1_Click()
End
End Sub

Doble clic sobre scroolbar y escriba:

Private Sub SBAZUL_Change()
SBAZUL_Scroll
End Sub

Private Sub SBAZUL_Scroll()
DOCOLOR
End Sub

Private Sub SBROJO_Change()
SBROJO_Scroll
End Sub

Private Sub SBROJO_Scroll()
DOCOLOR
End Sub

Private Sub SBVERDE_Change()
SBVERDE_Scroll
End Sub

Private Sub SBVERDE_Scroll()
DOCOLOR
End Sub
La función que creamos es la función DOCOLOR, escribimos entonces :
Private Sub DOCOLOR()
Text1.BackColor = RGB(SBROJO.Value, SBVERDE.Value, SBAZUL.Value)
End Sub

No hay comentarios:

Publicar un comentario