Public Class Form1
 
    Public Sub New()
        InitializeComponent()
 
        Me.picBox.AllowDrop = True
        Me.picbox1.AllowDrop = True
 
        AddHandler picBox.MouseDown, AddressOf btnimage_MouseDown
        AddHandler picBox.DragDrop, AddressOf pictureBox_DragDrop
        AddHandler picBox.DragEnter, AddressOf pictureBox_DragEnter
    End Sub
 
    Private Sub btnimage_MouseDown(ByVal sender As Object, ByVal e As _
      MouseEventArgs)
 
    End Sub
 
    Private Sub pictureBox_DragEnter(ByVal sender As Object, ByVal e As _
      DragEventArgs)
 
    End Sub
 
    Private Sub pictureBox_DragDrop(ByVal sender As Object, ByVal e As _
      DragEventArgs)
 
    End Sub
 
End Class