Drag & Drop zwischen zwei PictureBoxen VB-Version:  VB5, VB6
	Views:  10.147

Wie Sie Bilder von einer PictureBox in eine zweite PictureBox per Drag & Drop kopieren können zeigt Ihnen nachfolgender Code. Fürdas Beispiel benötigen Sie eine Form, auf der Sie zwei PictureBoxen platziert haben, deren DragMode-Eigenschaft auf 1 - Automatisch undAutoSize = True gesetzt sind. Zusätzlich statten Sie die PictureBox2 über die Picture-Eigenschaft mit einem Bild aus:

Option Explicit
 
Private Sub Picture1_DragDrop(Source As Control, X As Single, Y As Single)
   If Source Is Picture2 Then
     Picture1.Picture = Picture2.Picture
   End If
End Sub