PictureBox1.AllowDrop = True
My February column in the UTMag (www.utmag.com) is on this topic!>Private Sub PictureBoxSource_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBoxSource.MouseMove > If e.Button = MouseButtons.Left Then > Dim dropEffect As DragDropEffects = sender.DoDragDrop(sender, DragDropEffects.Copy) > MessageBox.Show("End drag! " + dropEffect.ToString) > End If >End Sub > >Private Sub PictureBoxDest_DragOver(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles PictureBoxDest.DragOver > e.Effect = DragDropEffects.Copy >End Sub > >Private Sub PictureBoxDest_DragDrop(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles PictureBoxDest.DragDrop > MessageBox.Show("DragDrop ") >End Sub >>