Реализовать мигающую кнопку - VB

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

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

Всем привет! Не найдется примера анимации с кнопкой. Цель привлечь внимание. Например мигающая кнопка, или что то инное...

Решение задачи: «Реализовать мигающую кнопку»

textual
Листинг программы
' Установить в Properties кнопки Command1  свойство Style = 1- Graphyical
' На форму положить Timer1
Private Sub Command1_Click()
Timer1.Enabled = False
Command1.BackColor = &H8000000F
'Ваш код
End Sub
 
Private Sub Form_Load()
Timer1.Interval = 500
Timer1.Enabled = True
End Sub
 
Private Sub Timer1_Timer()
Command1.BackColor = RGB(Rnd * 256, Rnd * 356, Rnd * 256)
End Sub

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


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

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

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