Dim intNumber As Integer

Private Sub Form_Load()
   intNumber = 0
   imgViewer.Picture = imgGraphics(intNumber).Picture
End Sub

Private Sub Timer1_Timer()
   imgViewer.Picture = imgGraphics(intNumber).Picture
   If intNumber < 2 Then
      intNumber = intNumber + 1
   Else
      intNumber = 0
   End If
End Sub

The above example is a very simple slide show. When the timer fires after 1 second, it updates the image shown by the imageViewer.

In this chapter, you were introduced to the Timer Control. The Timer control can execute code at regular intervals by causing a Timer event to occur. Moreover, we talked about control arrays. A control array is a grouping of identical controls.