Реализовать мигающую кнопку - 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
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д