Как описать нажатие на один из группы лейблов - VB

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

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

В общем. Пишу программу "график работы" Суть в том, что по нажатию на лейбл, он меняет цвет(желтый или зеленый) в зависимости от сотрудника который в этот день работает. Только не хочу я тыкать в каждый лейбл и прописывать каждому из них, что с ними должно произойти... Есть 31 лейбл (Leibl8(0) - Leibl8(30)) по нажатию на любой из них, тот на который нажал сначала меняет цвет на желтый, при повторном нажатии на зеленый и при третьем нажатии возвращает себе исходный цвет.))

Решение задачи: «Как описать нажатие на один из группы лейблов»

textual
Листинг программы
Private Sub Label8_Click(Index As Integer)
   With Label8(Index)
      If .BackColor = &H8000000F Then
         .BackColor = vbYellow
      ElseIf .BackColor = vbYellow Then
         .BackColor = vbGreen
      Else
         .BackColor = &H8000000F
      End If
    End With
End Sub

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


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

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

9   голосов , оценка 4.222 из 5
Похожие ответы