progressbar vb.net

¡ Hola !
Saludos Gracias de antemano, tenía un formulario que al abrir mostraba un ProgressBar, le adicioné código para que al mismo tiempo en un Label mostrara "L o a d i n g . . . " parpadeando, pero el incluir esta última parte, el progressBar queda estancado y solo parpadea el Label "L o a d i n g . . . ", que debo corregir?

Nevamente Gracias

' Este procedimiento permite que el Label que muestra "Loading. . ." y parpadee

Private WithEvents timer As Windows.Forms.Timer
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
ProgressBar1.Increment(5)
Label6.Text = ProgressBar1.Value

If Label6.Text = ProgressBar1.Value Then

timer = New Windows.Forms.Timer
timer.Interval = 500
timer.Start()
Else
End If
End Sub

Private Sub Timer_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles timer.Tick

Static parpadear As Boolean

If Not parpadear Then
lblLoad.ForeColor = lblLoad.BackColor
Else
lblLoad.ForeColor = SystemColors.WindowText
End If

parpadear = Not parpadear

End Sub