Visual Basic.NET - COLOR EN TABPAGES

 
Vista:
sin imagen de perfil

COLOR EN TABPAGES

Publicado por Jose Alberto (10 intervenciones) el 22/02/2014 19:44:30
Buenas tardes amigos del foro tengo el siguiente problema:
Creé un tabcontrol cuyos tabpages se agregan con títulos obtenidos de un filtro que hago en una tabla, este filtro me crea 12 tabpages a los cuales quisiera cambiarles el color de fondo a la pestaña y colocar el texto en negritas cada vez que hago click en un tabpage, he intentado varias formas y no he podido hacerlo, abajo les coloco las instrucciones que he utilizado.

Gracias de antemano por la ayuda

Private Sub TCListado_Click(sender As Object, e As EventArgs) Handles TCListado.Click

Dim Seleccion As String

Seleccion = Me.TCListado.SelectedTab.Text

Me.TCListado.SelectedTab.BackColor = Color.Blue

End Sub

Private Sub TCListado_SelectedIndexChanged(sender As Object, e As EventArgs) Handles TCListado.SelectedIndexChanged

Select Me.TCListado.SelectedIndex

Case 0
Me.TCListado.SelectedTab.ForeColor = Color.DarkGoldenrod
Case 1
Me.TCListado.SelectedTab.ForeColor = Color.DarkBlue
Case 2
Me.TCListado.SelectedTab.ForeColor = Color.DimGray
Case 3
Me.TCListado.SelectedTab.ForeColor = Color.HotPink
Case 4
Me.TCListado.SelectedTab.ForeColor = Color.MediumSpringGreen
End Select


End Sub
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder