Questione : VB6 MSFlexgrid a colori se

Ciao tutti, il

I vorrebbero mettere la fila nel colore grigio se il testo in colonna 2 e la colonna 3 sulla stessa fila sono il equal.

For ex: se sulla fila 6, sul testo in colonne 2 = 10 e sul testo in colonne 3 = 10, allora esso metta la fila 6 in un color.

How può io fa quello per soddisfare?

Thanks per il vostro help. class= del

Risposta : VB6 MSFlexgrid a colori se

Penso che possiate avere bisogno di un più facile capire la soluzione per cominciare con. Ciò può aiutare.
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 fioco come numero intero
intCol fioco come numero intero

strColumn2 fioco come stringa
strColumn3 fioco come stringa 

Per intRow = 0 a MSFlexGrid1.Rows - 1
    
    '/insieme la fila    
    MSFlexGrid1.Row = intRow

    '/controllo se la fila è 6?
    Se intRow = 6 allora

        '/soddisfare colonna 2 di bloccaggio
        MSFlexGrid1.Col = 2
        strColumn2 = MSFlexGrid1.Text    
    
        '/soddisfare colonna 3 di bloccaggio
        MSFlexGrid1.Col = 3
        strColumn3 = MSFlexGrid1.Text

        Se strColumn2 = “10„ e strColumn3 = “10„ allora
    
            '/ciclo attraverso ogni colonna e cambia il backcolor
            Per il intCol = 0 a MSFlexGrid1.Cols - 1
                MSFlexGrid1.Col = intCol
                MSFlexGrid1.CellBackColor = 'vbGray/o qualsiasi colore
            Dopo

        Concluder se

    Concluder se

Dopo
Altre soluzioni  
 
programming4us programming4us