El primer paso es ingresar los botones q vamos a necesitar como primero vamos a ingresara un Textbox, tambien ingresamos dos Frame y los nombramos a uno le ponemos color de fondo y al otro lo ponemos color de fuente, dentro de cada frame ponemos 3 obtionbutton con diferentes colores y por ultimo dos commandbutton nuevo y salir.
Paso 2.
Lo segundo que aremos es ingresar los comandos de cada boton lo primero q escribiremos
Text1 = ""
Text1.BackColor = vbWrite
Text1.ForeColor = vbBlack
Text1.SetFocus
End Sub
El comando de salir
End
End Sub
Ahora los comandos de colores de fondo.
Private Sub Option1_Click()
Text1.BackColor = vbRed
End Sub
Private Sub Option2_Click()
Text1.BackColor = vbGreen
End Sub
Private Sub Option3_Click()
Text1.BackColor = vbBlue
End Sub
Comandos de la fuente:
Private Sub Option4_Click()
Text1.ForeColor = vbCyan
Text1.SetFocus
End Sub
Private Sub Option5_Click()
Text1.ForeColor = vbMagenta
Text1.SetFocus
End Sub
Private Sub Option6_Click()
Text1.ForeColor = vbWhite
Text1.SetFocus
End Sub
Paso 3.
Como ultimo paso mandamos a ejecutar el programa y podemos comprobar si los colores funcionan en el fondo y el color de texto.


No hay comentarios:
Publicar un comentario