Проект "Сенсорные кнопки"
Здравствуйте, и первый вопрос возникает. Почему тема называется «сенсорные кнопки»? Потому что мы будем делать проект, в котором при наведении мышки на Label будет меняться цвет формы. Создайте новый проект, назовите его «Sensor buttons». Теперь добавим один Label и в его свойствах измените, что бы AutoSize был равен False. Поменяйте размер Label на своё усмотрение, потом удалите текст и поменяйте цвет BackColor = OrangeRed
(это тоже можно сделать в свойствах Label). Скопируйте ещё два Label, поменяв цвет
второму на DarkGray, третьему на LimeGreen.
Должно выйти примерно так (лейблы я сделал размером 78; 42)
Давайте теперь напишем код к каждому Label.
1 Label:
Private Sub Label1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Label1.MouseMove
Me.BackColor = Color.OrangeRed
End Sub
Цвет формы меняется на оранжевый.
2 Label:
Private Sub Label2_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Label2.MouseMove
Me.BackColor = Color.DarkGray
End Sub
Цвет формы меняется на серый.
3 Label:
Private Sub Label3_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Label3.MouseMove
Me.BackColor = Color.LimeGreen
End Sub
Цвет формы меняется на зелёный цвет.
Теперь при наведении на Label форма будет менятся в цвет Лэйбла.
Копирование материалов с сайта разрешается только с указанием ссылки на наш сайт.