In this blog we will know how to Blink a Text.

Drag and drop one Timer control and one Label control to the form

Public Class Form1

Dim i As Integer

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Timer1.Enabled = True

End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

i += 1

If i = 10 Then

Label1.Text = "Blink a Text in vb.net"

Label1.ForeColor = Color.Red

ElseIf i = 20 Then

Label1.Text = ""

i = 0

End If

End Sub

End Class