Jobs
Author: MR. Irfan Date Submitted: 8/30/2006 Category: Graphics Compatibility: VB 6 This code has been accessed 5307 times.
Email Yourself this snippet:
'Add two timers on the form i.e timer1 and timer2 .Also add one label.
Code
Private Sub Form_Load() Label1.Caption = "India" Timer1.Interval = 150 Timer2.Interval = 150 End Sub Private Sub Timer1_Timer() Label1.ForeColor = vbRed End Sub Private Sub Timer2_Timer() If Label1.ForeColor = vbRed Then Label1.ForeColor = vbBlue End If End Sub