How to setup a Timer Function

Tech Talk vb.Net
1 

' At the top of your form:
Dim PicCounter As Integer = 0

' In a button click event:
 Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Timer1.Enabled = True
        Timer1.Interval = 1000
    End Sub

' In the Timer's Tick event:
 Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Timer1.Tick

        PicCounter += 1 ' Inc the counter
       
      ' Show next picbox, depending on where we are in the sequence:
        Select Case PicCounter
            Case 1
                PictureBox1.Visible = True
                PictureBox3.Visible = False
                Timer1.Interval = 1000 '<-- This will make PictureBox1 Visable for 1 sec
            Case 2
                PictureBox2.Visible = True
                PictureBox1.Visible = False
                Timer1.Interval = 2000 '<-- This will make PictureBox2 Visable for 2 sec
            Case 3
                PictureBox3.Visible = True
                PictureBox2.Visible = False
                PicCounter = 0
                Timer1.Interval = 500 '<-- This will make PictureBox3 Visable for 1/2 sec
        End Select
    End Sub