Imports System
Imports System.Windows.Forms
Imports System.Drawing
 
Namespace DrawImageTest
   Public Class Form1
       Private pb As PictureBox = Nothing
       Private btn As Button = Nothing
       Public Sub New()
           Dim pic As String = "/tmp/pic1.jpg"
           pb= new PictureBox()
           btn = new Button()
           AddHandler btn.Click, AddressOf Btn_Click
           btn.Location = new Point(100, 10)
           pb.Image = Bitmap.FromFile(pic)
           Me.Controls.Add (pb)
           Me.Controls.Add (btn)
      End Sub
      Private Sub Btn_Click(ByVal sender As Object, ByVal e As EventArgs)
         Dim g As Graphics = Me.pb.CreateGraphics()
         Dim pic2 As String = "/tmp/pic2.jpg"
         Dim img As Bitmap = Bitmap.FromFile(pic2)
         g.DrawImage(img, new Point(5, 5))
      End Sub
  End Class
End Namespace