Pergunta : VB6 MSFlexgrid na cor se

Olá! todos,

I gostariam de põr a fileira na cor cinzenta se o texto na coluna 2 e a coluna 3 na mesma fileira são o equal.

For ex: se sobre a fileira 6, o texto na coluna 2 = 10 e o texto na coluna 3 = 10, então ele põr a fileira 6 em um color.

How pode mim faz isso para satisfazer?

Thanks para seu help. class= do

Resposta : VB6 MSFlexgrid na cor se

Eu penso que você pode precisar um mais fácil compreender a solução para começar com. Isto pode ajudar.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:

intRow não ofuscante como o inteiro
intCol não ofuscante como o inteiro

strColumn2 não ofuscante como a corda
strColumn3 não ofuscante como a corda 

Para o intRow = 0 a MSFlexGrid1.Rows - 1
    
    '/jogo a fileira    
    MSFlexGrid1.Row = intRow

    '/verificação se a fileira é 6?
    Se intRow = 6 então

        '/índice coluna 2 da captação
        MSFlexGrid1.Col = 2
        strColumn2 = MSFlexGrid1.Text    
    
        '/índice coluna 3 da captação
        MSFlexGrid1.Col = 3
        strColumn3 = MSFlexGrid1.Text

        Se strColumn2 = “10” e strColumn3 = “10” então
    
            '/laço através de cada coluna e muda o backcolor
            Para o intCol = 0 a MSFlexGrid1.Cols - 1
                MSFlexGrid1.Col = intCol
                MSFlexGrid1.CellBackColor = 'vbGray/ou alguma cor
            Em seguida

        Terminar se

    Terminar se

Em seguida
Outras soluções  
 
programming4us programming4us