Вопрос : VB6 MSFlexgrid в цвете если

Здравствулте! все,

I хотел были бы положить рядок в серый цвет если текстом в колонке 2 и колонкой 3 на таком же рядке будут equal.

For ex:, то если рядок 6, текст в колонке 2 = 10 и текст в колонке 3 = 10, после этого оно оденет в, то рядок 6 в сером color.

How может я делает то для того чтобы угодить?

Thanks для вашего help. class=

Ответ : VB6 MSFlexgrid в цвете если

Я думаю вы может легкая для того чтобы понять разрешение для того чтобы начать с. Это может помочь.
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 как интежер
Тусклое intCol как интежер

Тусклое strColumn2 как шнур
Тусклое strColumn3 как шнур 

Для intRow = 0 к MSFlexGrid1.Rows - 1
    
    '/комплект рядок    
    MSFlexGrid1.Row = intRow

    '/проверка если рядок 6?
    Если intRow = 6 после этого

        '/содержание колонки 2 захвата
        MSFlexGrid1.Col = 2
        strColumn2 = MSFlexGrid1.Text    
    
        '/содержание колонки 3 захвата
        MSFlexGrid1.Col = 3
        strColumn3 = MSFlexGrid1.Text

        Если strColumn2 = «10» и strColumn3 = «10» после этого
    
            '/петля через каждую колонку и изменяет backcolor
            Для intCol = 0 к MSFlexGrid1.Cols - 1
                MSFlexGrid1.Col = intCol
                MSFlexGrid1.CellBackColor = vbGray '/или любой цвет
            Затем

        Закончитесь если

    Закончитесь если

Затем
Другие решения  
  •  Как я добавляю кнопки на форме PDF для того чтобы добавить/извлекаю рядки данных?
    •
  •  Шнур ошибки в блоке задвижки?
    •
  •  сколько вариант сервера SQL на одной машине
    •
  •  Внешний вид 2007 не может архивный файл открытой сети сохраненный
    •
  •  Активно директория DNS записывает вопрос
    •
  •  Отчет о доступа 2010 экспорта к CSV с коллекторами?
    •
  •  Прокладчик OCE 9400 не начинает
    •
  •  как добавить десятичное место в формуле в отчете о кристалла seagate
    •
  •  Windows XP и Мичрософт Оутлоок и проблемы установителя Windows
    •
  •  VB6 к VS2010 - консультации тренировки?
    •
     
    programming4us programming4us