HELP with label in progress bar! (VB.net)

Help me with LABEL in progress Bar:

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

ProgressBar1.Maximum = 200

ProgressBar1.Value = ProgressBar1.Value + 1

If ProgressBar1.Value = ProgressBar1.Maximum Then

Label1.Visible = True

Label1.Text = "I love you"

Timer1.Enabled = False

ProgressBar1.Value = 0

Beep()

ProgressBar1.Visible = False

End If

End Sub

As you see, once the progress bar stops, it displays the label "I love you", however, I want that once the progress bar starts, it displays the label, and also how to display more texts until the progress bar finish?



I mean I want to display also some other texts like "I can't live without you", "You are my life", just after the label I love you has been displayed. The process must start when the progress bar starts and finish when the progress bar finishes. Each label must be changed in each 3 seconds.

Tags: Visual Basic