title: Split an Image into different PictureBoxes
body: <p>I have a Image with size <code>187x16</code> which contain 10 smaller Images in a row.  </p>
  
  <p>I want split those Images into 10 different PictureBoxes.<br>
  Original Image:  </p>
  
  <p><img src="https://i.stack.imgur.com/tDyFJ.gif" alt="example image"></p>
  
  <pre><code>Dim fr_bm As New Bitmap(Image.FromFile(AppDomain.CurrentDomain.BaseDirectory &amp; "/images/u/image.gif"))
  Dim to_bm As New Bitmap(16, 16)
  Dim unitsimagearray(9) As Image
  Dim gr As Graphics = Graphics.FromImage(to_bm)
  For i As Integer = 0 To 9
      Dim fr_rect As New Rectangle(i * 19, 0, 16, 16) '0,19,38,76
      Dim to_rect As New Rectangle(0, 0, 16, 16)
      gr.DrawImage(fr_bm, to_rect, fr_rect, GraphicsUnit.Pixel)
      unitsimagearray(i) = to_bm
  Next
  u1.Image = unitsimagearray(0)
  </code></pre>
  
  <p>But the PictureBox shows all the splitted images.  </p>