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