How to create a Image Index for a TabPage Control composed of 6 tabs

[piscis]

Does anyone know how to create a Image Index for a TabPage Control composed of 6 tabs. I need to place a small image right before the Tab Text.

[dynamic_sysop]

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

       Dim x As Integer

       For x = 0 To Me.TabControl1.TabCount - 1
           Me.TabControl1.TabPages(x).ImageIndex = x '/// assuming you have 6 images in an imagelist.
       Next

   End Sub