Как в компоненте MSHFlexGrid программно изменить цвет столбца? - VB

Узнай цену своей работы

Формулировка задачи:

Есть MSHFlexGrid в нём 2 фиксированных столбца и 2 фиксированные строчки. Нефиксированных строк - от 50 до 1000 (в зависимости от выбранных пользователем условий). В зависимости от данных в первой фиксированной строке (перечисляются дни периода с указанием дня недели: ПН,ВТ, СР, ЧТ....) надо соответствующий столбей (ВС) закрасить серым цветом. Т.е выделить столбец, относящийся к воскресным дням. Номера столбцов, которые соответствуют Воскресенью - занесла в одномерный массив. пытаюсь так закрасить :
Листинг программы
  1. For j = LBound(num_col_sunday) To UBound(num_col_sunday)
  2. If num_col_sunday(j) > 0 Then
  3. MSHFlexGrid1.SelectionMode = flexSelectionByColumn
  4. MSHFlexGrid1.ColSel = num_col_sunday(j)
  5. MSHFlexGrid1.CellBackColor = &HC0C0C0 ' закраска
  6. Else: Exit For
  7. End If
  8. Next j
но получается фигня - где стоял курсор - ту ячейку и красит.... Как закрасить столбцы?

Решение задачи: «Как в компоненте MSHFlexGrid программно изменить цвет столбца?»

textual
Листинг программы
  1. For i=0 to 12 step 2
  2. MSFlexGrid1.Col=i
  3. For ii=1 to MSFlexGrid1.Rows-1
  4. MSFlexGrid1.Row=ii
  5. MSFlexGrid1.CellBackColor=vbBlue
  6. Next
  7. Next

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

15   голосов , оценка 4.467 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы