Visual Basic - cambiar color de fila a msflexgrid

Life is soft - evento anual de software empresarial
 
Vista:

cambiar color de fila a msflexgrid

Publicado por josefello (38 intervenciones) el 27/05/2005 12:11:43
Hola
tengo un MSFlexGrid donde muestro datos de personas, las cuales pueden tener el campo activo con valor TRUE o FALSE.
Quiero que cuando se muestre la tabla, las filas que hagan referencia a las personas cuyo campo activo sea FALSE, aparezcan de otro color, para que se diferencien. Para ello he probado el siguiente código pero no me funciona;
While Not rs1.EOF
If rs1.Fields("activo").Value = "False" Then
For j = 1 To cols-1
tablaPagos.CellBackColor = "&H8000000D&"
Next
End If
...
wend
He probado a quitar y poner comillas, pero nada
Espero que alguien pueda ayudarme.
Gracias
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

RE:cambiar color de fila a msflexgrid

Publicado por Avellaneda (131 intervenciones) el 27/05/2005 13:25:06
Prueba con este código:
Private Sub Command1_Click()
Dim j As Integer
For j = 1 To MSFlexGrid1.Rows - 1
MSFlexGrid1.Row = j
MSFlexGrid1.Col = 6
If MSFlexGrid1.TextMatrix(j, 6) = "False" Then
MSFlexGrid1.CellBackColor = &H8000000D
End If
Next j
End Sub
Cambia el 6 por el número de columna del grid donde esté el campo "activo"
Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar